>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/
