Select Code to Download

use strict;
use warnings;
...
__DATA__
00:00:00.20 - blah blah perl him me it they 0223503 blah blah blah
00:00:00.30 - blah blah perl him me it they 0223504 blah blah blah

while (<IN>) {
   push @array, join('#',(split)[9, 0]);
}

my @array = map join('#',(split)[9, 0]), <IN>;