Операции с файлами на месте c сохранением оригинала в резервной копии ( -i.bak ): perl -i.bak -pe 's/\n/\r\n/g' *.txt
15 июня 2012 г., 19:52 пользователь Ruslan Zakirov <[email protected]> написал: > 2012/6/15 Alessandro Gorohovski <[email protected]>: >> Уважаемое сообщество, >> Доброго времени суток! >> >> Подскажите, кто знает, пользуется >> хорошую книгу (может ресурс) по Perl однострочниками > > Для начала зватает нескольких шаблонов > > Операции с файлами на месте: > find . -type f | xargs perl -i -pe 's/foo/bar/' > > Выковыривание из потока: > cat file | perl -ne '/(foo)/ && print "$1\n"' > > Агрегация потока: > cat file | perl -ne '$s += $_; END { print "$s\n" }' > > Если народ накидает еще шаблонов можно сделать perl one-liners cheat sheet :) > >> Спасибо >> -- >> Moscow.pm mailing list >> [email protected] | http://moscow.pm.org > > > > -- > Best regards, Ruslan. > -- > Moscow.pm mailing list > [email protected] | http://moscow.pm.org -- Moscow.pm mailing list [email protected] | http://moscow.pm.org
