from a similar script:

my ($timestamp, $ip, $result, $bytes) = (split) [0,2..4];
[download]