rezolvat, multumesc fumos.
On Wed, 8 Sep 2004, Stefan Maldaianu wrote:
> >stiu ca reinventez roata, dar vreau sa-mi fac un parser de log-uri de
> >squid.
> >intrebare : valoarea 1094636429.519 , de exemplu, cred ce reprezinta data,
> >chiar data de azi....
>
> iata un script in perl...ce te poate ajuta
>
> #!/usr/bin/perl
>
>
> print "Content-type: text/html\n\n";
>
> ($sec,$min,$hour,$mday,$mon,$year) = (localtime(1094636429.519))[0,1,2,3,4,5];
> $month = sprintf("%.2d", ($mon + 1));
> $mday = sprintf("%.2d", $mday);
> $sec = sprintf("%.2d", $sec);
> $min = sprintf("%.2d", $min);
> $hour = sprintf("%.2d", $hour);
> $hour = $hour + 7;
> if($hour == 25){ $hour=1}
> if($hour == 26){ $hour=2}
> if($hour == 27){ $hour=3}
> if($hour == 28){ $hour=4}
> if($hour == 29){ $hour=5}
> if($hour == 30){ $hour=6}
> if($hour == 31){ $hour=7}
> $year += 1900;
>
> print "$month/$mday/$year $hour:$min:$sec";
>
> ca rezultat returneaza...
>
> 09/08/2004 12:40:29
>
> ---
> Detalii despre listele noastre de mail: http://www.lug.ro/
>
>
---
Detalii despre listele noastre de mail: http://www.lug.ro/
