my $i = 0;
while (<>) { # read from @ARGV
    chomp;
    push @{ $value[$i++] }, /:([^:]+)/; # get timestamp
    $i = 0 if eof;
}