Select Code to Download

use strict;

...
    }
close (FILE);
close (NEW);

NAME                           PT #          AT        

...
DOE                            H000000000    I
DOE                            H000000000    O
SMITH                          H000000000    I

HT00000000    I
HT00000000    S
...
H000000000    I
H000000000    O
H000000000    I