Select Code to Download

#!/usr/bin/perl; 
use strict;
use warnings;
...
}
close ($oh);
close ($ih);

82  2 22 1043 54.7 48.020 114.037 17.5 3.2     2.9 13 177  84.3 0.20  
+1.6  2.7 C MBMG *         3.1 KALISPELL VALLEY; FELT            3.07

82022210
...
RXF EPC4414.3

CLX IPC4408.70 ES19.7

177
events(list)
54.7, 114.037, 48.020, 17.5, 84.3
...

events(list)
, , , ,

13
'BUT' 4432.80 4 60.7 0 
...
'CLX' 4408.70 0 19.7 0
54.7 114.037 48.020 17.5 177
GO ON TO NEXT EVENT DATA SET