12345: 12:34:00,890,987,9876,...
12346: 12:35:02,789,987,234,...
12344: 12:35:04,345,987,1234,...
etc.

##</code><code>##

LINE: while (<THATFILE>) {
	next LINE if (!/^\d+: \d{2}:/ );
	foreach $field(split /,/, $line) {
		chomp $field;
		if ($field == '987') {
 		foreach $subtime (split /:/, $field) {