Help for this page

Select Code to Download

Select or download this

while (my $record = <UNMATCHED>) {
    my @fields = split(/:/, $record);
    ...
    }