Самое первое число (длинное) в логе access.log - это дата. Как правильно преобразовать в нормальную дату (часы: минуты , лень: месяц: год)
Киньте ссылку или еще что-нибудь .
Зараннее благодарен
>Самое первое число (длинное) в логе
>access.log - это дата. Как
>правильно преобразовать в нормальную дату
>(часы: минуты , лень: месяц:
>год)
>Киньте ссылку или еще что-нибудь .
>
>Зараннее благодаренProgramm conv.pl
---- cut ----
#!/usr/bin/perl
use POSIX qw(strftime);
$[ = 1;while (<>) {
chomp;
@Fld = split(' ', $_);
$l = length($Fld[1]);
printf strftime "%c ", localtime($Fld[1]);
printf "%s\n", substr($_, $l + 1);
}
-----cut -----
usage :
./conv.pl < path_to_access.log > out
Sorry for possible bugs
>Самое первое число (длинное) в логе
>access.log - это дата. Как
>правильно преобразовать в нормальную дату
>(часы: минуты , лень: месяц:
>год)
>Киньте ссылку или еще что-нибудь .
>
>Зараннее благодаренman date в сторону date -r
>>Самое первое число (длинное) в логе
>>access.log - это дата. Как
>>правильно преобразовать в нормальную дату
>>(часы: минуты , лень: месяц:
>>год)
>>Киньте ссылку или еще что-нибудь .
>>
>>Зараннее благодарен
>
>man date в сторону date -r
>date -r vivodit datu modifikatsii faila, a cheloveku nuzhnu peredelat' timestamp v normal'nuyu datu. Chto ta proga na perl-e i delaet.