On 2006-01-03 14:05, Doug Poland <[EMAIL PROTECTED]> wrote:
> I wrote some time ago:
> > $ echo '1131556815.537 101 172.16.2.153 TCP_HIT/200 35674 GET' | \
> > perl -MPOSIX=strftime \
> > -pe 'chomp; @x=split /\./; \
> > $ts = strftime "%Y-%m-%d %H:%M:%S", (localtime($x[0])); \
> > $_=$ts.".".join(".",@x[1,$#x])."\n";'
> > 2005-11-09 09:20:15.537 101 172.153 TCP_HIT/200 35674 GET
>
> Thank you, Giorgos, for that excellent Perl one-liner. There is a
> minor problem in that not all the input fields are output correctly.
> Note the IP address is truncated. I took the liberty of fixing and
> simplifiing (or, obfuscating, depending on one's point of view)
>
> tail -f /usr/local/squid/logs/access.log | \
> perl -MPOSIX=strftime -ane \
> '$F[0] = strftime "%Y-%m-%d %H:%M:%S", (localtime($F[0])); \
> print join(" ", @F) . "\n";'
You're most welcome, of course :)
_______________________________________________
freebsd-questions@freebsd.org mailing list
http://lists.freebsd.org/mailman/listinfo/freebsd-questions
To unsubscribe, send any mail to "[EMAIL PROTECTED]"
