Главная /
Регулярные выражения Perl и их применение /
Что будет напечатано в результате выполнения программыmy ($a,$b)=('a','a'); while ($a ne 'd' && $b =~ /(??{ "$a" })/o) { print $&; $a++; $b++; }
Что будет напечатано в результате выполнения программыmy ($a,$b)=('a','a');
while ($a ne 'd' && $b =~ /(??{ "$a" })/o) { print $&; $a++; $b++; }
вопрос
Правильный ответ:
aaa
a
abc
Сложность вопроса
47
Сложность курса: Регулярные выражения Perl и их применение
87
Оценить вопрос
Комментарии:
Аноним
спасибо
13 сен 2020
Аноним
Я провалил зачёт, почему я не углядел этот крутой сайт с ответами по интуит до сессии
05 май 2019
Другие ответы на вопросы из темы программирование интуит.
- # Какие регулярные выражения захватят в $1 подстроку 'yahoo!', а в $2 - подстроку 'a_bc' из строки 'ab!c yahoo! a_bc'?
- # Что будет напечатано в результате работы программыmy $a='[a-z]'; my $re=qr'$a'; print 'OK' if 'A' =~ /$re/;
- # Нужно из текста в $_ захватить в массив @a все слова, состоящие только из латинских букв и содержащие единственную букву h, которая не стоит с краю, независимо от регистра. В каких вариантах это делается верно?
- # Дан текст:$_=<<EOD; <a href='javascript:void(window.open("http://intuit.ru/book.html","","width=480,height=320"))'>Book</a><br> <a href="http://intuit.ru/index.html">index</a> EOD Какие операторы правильно печатают обе ссылки?
- # Какое значение получит переменная $^R в результате работы программы'ab!abc!' =~ /(\w+)!(?(?{ $1 eq 'abc' })(\w+)|(?{ $1 ne 'ab' }))/