Help for this page
{ print $2"|"$3"|"$7 }
awk '{print $2"|"$3"|"$7}' web.log | perl parselog.pl
while (<>) { chomp; my ($time, $date, $expo) = split /\|/; print "$time, $date, $expo\n"; }