Товарищи, подскажите пожалуйста как можно разделить большой (21 гигабайт) лог файл сквида по дням (месяцам), т.е. один день (месяц) - один лог файл? В скриптах, к сожалению, не силён.

• Разбивка access.log файла по дням (месяцам).,_krool, 11:29 , 06-Дек-07
  • Разбивка access.log файла по дням (месяцам).,dotdm, 11:50 , 06-Дек-07
• Разбивка access.log файла по дням (месяцам).,idle, 11:14 , 07-Дек-07
  • Разбивка access.log файла по дням (месяцам).,dotdm, 17:05 , 09-Дек-07
    • Разбивка access.log файла по дням (месяцам).,Bo, 10:40 , 14-Июн-10
      • Разбивка access.log файла по дням (месяцам).,idle, 19:57 , 12-Ноя-11

>Товарищи, подскажите пожалуйста как можно разделить большой (21 гигабайт) лог файл сквида
>по дням (месяцам), т.е. один день (месяц) - один лог файл?
>В скриптах, к сожалению, не силён.

немного не в тему, но откуда такой больлой размер ?? есил нужны все логи за все года, то лучше к примеру каждый новый год его копировать к примеру на болванку, а рабочий затирать, и каждый год новый фаул :)

>немного не в тему, но откуда такой больлой размер ?? есил нужны
>все логи за все года, то лучше к примеру каждый новый
>год его копировать к примеру на болванку, а рабочий затирать, и
>каждый год новый фаул :)

Это лог за год (ну чуть больше, плюс пара месяцев). Просто до меня этот сквид был настроен немного неправильно в результате чего логи росли не по дням, а по часам (за год получилось около 140 гигов), плюс ротация была выключена. Я их почистил, отсортировал по дате и склеил в один файл.

>Товарищи, подскажите пожалуйста как можно разделить большой (21 гигабайт) лог файл сквида
>по дням (месяцам), т.е. один день (месяц) - один лог файл?
>В скриптах, к сожалению, не силён.

perl -lne'for([split]){($s,$min,$h,$d,$m,$y)=localtime(@$_[0]);system("echo @$_ >> $y-$m-$d")}' access.log
Год+=1900; месяц+=1.

>perl -lne'for([split]){($s,$min,$h,$d,$m,$y)=localtime(@$_[0]);system("echo @$_ >> $y-$m-$d")}' access.log
>Год+=1900; месяц+=1.

Спасибо, попробую.

>>perl -lne'for([split]){($s,$min,$h,$d,$m,$y)=localtime(@$_[0]);system("echo @$_ >> $y-$m-$d")}' access.log
>>Год+=1900; месяц+=1.
>
>Спасибо, попробую.

Нутром чую что поздновато спрашиваю.
Можно ли расписать что делает каждый элемент скрипта. В перле совсем не силен.
Спасибо.

>>>perl -lne'for([split]){($s,$min,$h,$d,$m,$y)=localtime(@$_[0]);system("echo @$_ >> $y-$m-$d")}' access.log
>>>Год+=1900; месяц+=1.
>>
>>Спасибо, попробую.
> Нутром чую что поздновато спрашиваю.
> Можно ли расписать что делает каждый элемент скрипта. В перле совсем не
> силен.
> Спасибо.

Верно чуял.
Ещё и ответил не туда.