$logline = '217.230.71.217 - - [29/Sep/2003:09:51:13 +0200] "GET / HTTP/1.1" 200 26657 www.domain.com "-" "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)" "-"';
my ($client_ip, $unknown1, $unknown2, $time, $request, $status, $bytes, $host, $referrer, $useragent, $realclient_ip) = $logline =~ m/^([^ ]+) ([^ ]+) ([^ ]+) \[([^\[]+)\] "([^"]+)" (\d+) (\d+) ([^ ]+) "([^"]+)" "([^"]+)" "([^"]+)"$/;
print "$client_ip\n$unknown1\n$unknown2\n$time\n$request\n$status\n$bytes\n$host\n$referrer\n$useragent\n$realclient_ip";