my $re = qr| ( \S+ ) \s # Month $1 ( \S+ ) \s # Day $2 ( \S+ ) [^\(]+ # Time $3 \( ( [^@]+ ) # User $4 @ ( [^\)]+ ) # IP $5 \) [^/]+ ( .* )\sdownloaded\s\( # File $6 ( \d+ ) \D+ # Size $7 ( [^\)]+ ) # Speed $8 |x;