В $_ дан текст:$_=<<EOD; Первый адрес:<a href='mailto:abc\@def.com'>abc\@def.com</a>, второй адрес - <a href='mailto:ab.c\@def.com'>ab.c\@def.com</a> третий адрес - <a href = " mailto: a+b\@de-f.co.uk " >a-b\@def.ijk.co.uk</a> EOD Какие операторы извлекают все 3 адреса электронной почты из этого текста?

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

• # В тексте надо захватить в $1 фрагмент от первых до третьих кавычек. Какой оператор делает это правильно?
• # Какое значение получит переменная $1 в результате работы программы$_='abc123def'; /(\w+)/; /(?>\d+)(\d+)/;
• # Что будет напечатано в результате работы программы$a='-'; for (0..1) { print split /$a/o, 'a-b:c' . "!"; $a=':'; }
• # Какое телефонный номер будет захвачен в переменную $1 в следующем операторе поиска: '123-45-67 123-45 1234' =~ /(12[\d-]+|123[\d-]+|1[\d-]+)/ ?
• # В тексте надо все цифры увеличить на 1, а 9 заменить на 0. Какие операторы делают это правильно?