Записи с метками ‘Perl’

Выплыла старая задача – разобрать текстовый лог на предмет фраз введенных в поисковых системах. После недолгих раздумий получился маленький скрипт на Perl-е. Использование. На вход ему подается файл isa_log.txt, на выходе имеем файл isa_log_decode.txt. #!/usr/bin/perl open FILE, "<isa_log.txt"; open WFILE, ">isa_log_decode.txt" or die $!; my @lines = <FILE>; foreach $lines (@lines) {   print "$lines"; [...]

Получил некоторый заряд бодрости когда на домашнем ПК начал сыпаться диск. Немного подумав проверил бэкапы, перенес их свежие версии на DVD, осталось только понять что делать с локальным SVN репозиторием в котором хранятся все скрипты. Что делать… что делать.. Отсылать по почте на Gmail. Благо ящик большой… Отсылать вот таким скриптом на перле. Поясню некоторые [...]