Forum Webscript.Ru
Программирование => Регулярные выражения => Тема начата: Serg31416 от 28 Февраля 2008, 09:20:03
-
Привет всем.
Для тех, кто интересуется рег. выражениями: вышла моя книжка "Профессиональная работа в Perl. Регулярные выражения".
Я в ней глубоко и подробно разбираю этот вопрос. Юникод не рассматриваю. Вот один мой пример из этой книги:
# Заменить во всем тексте все символы табуляции соответствующим числом пробелов.
$_=<a\\tПервая строка\\t.
Вторая строка.
\\t\\tТретья строка.
Четвертая строка.
EOF
my ($offs,$tmp);
s/(?:^(?{ $offs=0 }))?
([^\\t\\n]*)
\\t
/$tmp=$offs+length $1;
$offs+=$tmp+(8-$tmp % 8);
$1.\' \' x (8-$tmp % 8)/egmx;
print $_;
На books.ru эта книжка стоит 225 р., я могу продать из своих авторских экз. за 200 р. вместе с пересылкой
(WMR, Яндекс-деньги, сберкасса). Пишите на wait4sleep [] rambler . ru
-
а чем она лучше фридла?
-
Более подробно, нет ошибок, исправлены его ошибки.
-
"нет ошибок" -- увижу в магазине, проверю :)
-
посмотрел в магазине книгу, мельком (не было времени долго смотреть).
резюме -- фридл лучше.