Какое значение получит переменная $_ в результате работы программы $_="123!abc!"; pos($_)=4; s/\G(\w+)!/x/g?

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

• # Что будет напечатано в результате работы программыmy $a='[a-z]'; my $re=qr'$a'; print 'OK' if 'A' =~ /$re/;
• # Что будет напечатано в результате работы программы$a='-'; for (0..1) { print split /$a/, 'a-b:c' . "\n"; $a=':'; }
• # Какое значение получит переменная $2 в результате работы программы 'aBc1b23' =~ /a(\w)\w+(\1)/i?
• # Какое значение получит переменная $1 в результате работы программы "abc\n" =~ /\w\Z(.)\z/s?
• # Какое значение получит переменная $1 в результате работы программы "abc123" =~ /(123|abc)$/?