Select Code to Download

# Parse the log record...
m{^(\d\d)/(\d\d)/(\d\d\d\d) (\d\d:\d\d:\d\d) (\S+) (\S+)} or die;
...
my %myHash;

push @{ $myHash{$data2}{'info'} }, "$timestamp,$data1";