Что будет напечатано в результате работы оператораprint join '-', grep /\d/, qw/a 1 b 2 c/;

вопрос

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

Оставить комментарий

Отправить

• # Что будет напечатано в результате работы программыmy $re=qr/(\w+)\w/; print $1 if 'abcabc' =~ /$re+/;
• # Нужно из текста в $_ захватить в массив @a все слова, состоящие только из латинских букв и содержащие единственную букву h, которая не стоит с краю, независимо от регистра. В каких вариантах это делается верно?
• # Какое значение получит массив @a в результате работы программы my @a="abc\n123" =~ /\w+/g?
• # Какое значение получит переменная $_ в результате работы программы $_='abc123'; s/(\d)/$1+100/eg?
• # Какое значение получит переменная $1 в результате работы программы $_="123!abc!"; /\w+/gc; /(\w+)/g?