Если я правильно понимаю, что у вас есть значение word1, и вы хотите напечатать два последовательных слова после сопоставления word1?
Попробуйте это: m/$word1Pattern\s+(?<word2>\S+)\s+(?<word3>\S+)/
После этого Perl хэш-карта с именем $+
должна содержать ключи word2 и word3, а $+{word2}
и $+{word3}
должны содержать ваши совпадения.
Если я понял ваш вопрос в первую очередь, то это ...