Версия для печати темы Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Perl: Регулярные выражения > Однострочник для вывода по РВ

Автор: arcsupport 11.3.2011, 23:16

Добрый вечер. Как реализовать такую возможность: Вывести из текстовых файлов все найденные токены, обрамив их специальным текстом. Т.е. для ыфлоплфРВыпфвгапг84угвРВыфпрг должно получиться abcРВdef abcРВdef Где РВ - регулярное выражение. Юникода там, слава богу, нет. Написал такой код: Код perl -e 'abc, m/[\w]+/gm, def, "\n"' *.txt Он не работает. В чем ошибка?

Автор: alezzz 12.3.2011, 12:34

perl -ne 'print "---$&---\n" while(/[A-Z]+/g)' file.txt ---DX--- ---ASLD--- ---TFGVSD--- file.txt: aaaaaaaaaaaaaaaaaaaDXbbbbbbbbbbbbbbbbASLDmmmmmmmmmmmmm ffffffffffTFGVSDlllllllllllllllll

Автор: arcsupport 12.3.2011, 14:47

Спасибо. Вопрос решен.

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)