Какое значение получит переменная $^R в результате работы программы' 'ab!abc!' =~ /(\w+)!(?(?{ $1 ne 'abc' })(\w+)|(?{ $1 eq 'ab' }))/

Правильный ответ:

• # Что будет напечатано в результате работы оператораprint join '-', split /^/m, "ab\nbc\nde";
• # Какой текст будет захвачен, соответственно, в переменную $1 и $2 следующим оператором: 'abcd' =~ /(\w*)(\w+)/?
• # Что выйдет на печать в результате работы программы $_="123!abc!"; print /\G\w+(?{ print pos $_ })!/g?
• # Что напечатается в результате работы программыour $a; 'abcABC' =~ /(?{ local $a=0 })(?:abc(?{ ++$a })|ABC(?{ $a+=10 }))(?!\w)(?{ print $a })/
• # Какое значение примет переменная $2 в результате работы программы'ab!abc!a!' =~ /(\w+)!(\w+)!(?(?{ $1 gt $2 })$)/