Какое значение получит переменная $_ в результате работы программы $_='abcABC'; my $re=qr'[a-z]+'i; s/(?-i)$re/!/?

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

• # Какое значение получит переменная $a в результате работы программыmy $a=10; 'abc123' =~ /((\w)+(?{ $a=$+ }))/;
• # Что будет напечатано в результате работы программы$_='abc123def'; /\d+/; print substr $_, $-[0], $+[0] - $-[0];
• # Что выйдет на печать в результате работы оператора 'abc123' =~ /\w+(?=(\d+))(?{ print $1 })/?
• # Какое значение получит переменная $1 в результате работы программы "123abc" =~ /(\d)+\d+(?(1)abc)/?
• # Какое значение получит переменная $_ в результате работы программы $_='abcABC'; my $re=qr'[A-Z]+'; s/$re/!/gi?