Главная /
Регулярные выражения Perl и их применение /
Адрес abc@intuit.ru зашифрован скриптом:$_=<<EOD; <script> a='\@'; e='abc'+a+'intuit.ru'; document.write('<a href=m'+'ailto:'+e+'><b>'+e+'</b></a>'); </script> EOD Какие операторы правильно печатают этот адрес?
Адрес abc@intuit.ru зашифрован скриптом:$_=<<EOD;
<script>
a='\@';
e='abc'+a+'intuit.ru';
document.write('<a href=m'+'ailto:'+e+'><b>'+e+'</b></a>');
</script>
EOD
Какие операторы правильно печатают этот адрес?
вопрос
Правильный ответ:
print "$1\@$2" if /\@.*=.([^'"]+).[^'"]+['"]([^'"]+)/s
print "$1\@$2" if /\@.*=.([^'"]+).[^'"]+.([^'"]+)/
print "$1\@$2" if /\@[^=]+=.([^'"]+).[^'"]+.([^'"]+)/
Сложность вопроса
82
Сложность курса: Регулярные выражения Perl и их применение
87
Оценить вопрос
Комментарии:
Аноним
Большое спасибо за помощь по интуит.
18 авг 2017
Другие ответы на вопросы из темы программирование интуит.
- # Какие операторы удаляют все пробельные символы только в конце каждой строки текста?
- # Что будет напечатано в результате работы программыmy $re=qr/(ab)c/; print $1.$2 if 'abcabc' =~ /$re+$re+/;
- # Что выйдет на печать в результате работы оператора 'abc123' =~ /\w+?(?=(\d+?))(?{ print $1 })/?
- # Какое значение получит переменная $2 в результате работы программы 'aBc1b23' =~ /a(\w)\w+(\1)/i?
- # В $_ дан текст:$_=<<EOD; Первый адрес:<a href="mailto:abc\@def.com">abc\@def.com</a>, второй адрес - <a href=http://www.intuit.ru>intuit.ru</a> EOD Какие операторы извлекают оба адреса из этого текста?