Select Code to Download

my $re = qr{
    ^ (\S+ \s+ \S+ \s+ \S+) \s+ # time_stamp: Sep 18 00:00:58
...
   my ($time, $host, $rest) = /$re/o;
   ...
}