Select Code to Download

while (my ($row) = <$fh2>) {

while (my $row = <$fh2>) {

$ cat t.pl
use strict;
...
Now is the time
for all good men
Use of uninitialized value $c in print at t.pl line 14, <DATA> line 5.