Главная /
Регулярные выражения Perl и их применение /
Дан текст:$_=<<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 Какие операторы правильно печатают обе
Дан текст:$_=<<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
Какие операторы правильно печатают обе ссылки?
вопрос
Правильный ответ:
print join "\n", m#<a\s+href=.*?(http://[^"]+)#
print join "\n", m#<a\s+href=.*(http://[^"]+)#g
print join "\n", m#<a\s+href=.*?(http://[^"]+)#gi
Сложность вопроса
74
Сложность курса: Регулярные выражения Perl и их применение
87
Оценить вопрос
Комментарии:
Аноним
Это очень заурядный решебник intuit.
13 дек 2020
Аноним
Гранд мерси за решебник по intuit.
05 авг 2019
Другие ответы на вопросы из темы программирование интуит.
- # Что будет напечатано в результате работы программы$_='abc123def'; /\d+/; print substr $_, $+[0];
- # Какое значение получит переменная $_ в результате работы программы $_='abc123'; s/(\d)/$1+100/e?
- # Что выйдет на печать в результате работы программы $_="123!abc!"; /\G\w+(?{ print pos $_ })!/g?
- # Какое значение получит переменная $_ в результате работы программы $_='[a-z]+abcABC'; my $a='[a-z]+'; s/\Q$a\E.*[A-Z]/!/?
- # Что напечатается в результате работы программыour $a; 'abcABC' =~ /(?{ local $a=0 })(?:abc(?{ ++$a })|ABC(?{ $a+=10 }))(?!$)(?{ print $a })/