Select Code to Download

use strict;
use warnings;
...

close $inFH
   or die qq{close: $inFile: $!\n};

Use of uninitialized value in scalar chomp at ./spw592594B line 11, <$
+inFH> line 1.
Use of uninitialized value in concatenation (.) or string at ./spw5925
+94B line 12, <$inFH> line 1.
--><--

use strict;
use warnings;
...

close $inFH
   or die qq{close: $inFile: $!\n};

-->1st line<--