Select Code to Download

#!/usr/bin/perl
use strict;
...
print WRITE $printout;
close WRITE || die "Couldn't close the CSV file";
exit  0;

Use of uninitialized value $_ in pattern match (m//) at basic.pl line 
+63.
Use of uninitialized value $_ in pattern match (m//) at basic.pl line 
+63.
...
Use of uninitialized value $_ in pattern match (m//) at basic.pl line 
+63.
Terminating on signal SIGINT(2)
Terminating on signal SIGINT(2)