As far as I can see, the prints for output are going to the console, not a
file. The statement you're referring to:
__END__
flat2rdb.pl sitelist.str.fo
has very little to do with the perl script. The __END__ tells the perl
interpreter to not compile/run anything after the __END__ line. So the
> When this is done running will it
> generate a file called sitelist.str.fo ?
Based on a quick glance at the script,
the stuff after the __END__ token is
not being used by the script.
So...
> if($QWFLAT eq '')
> {
> print "Enter QW flatfile file name -> ";
> chomp($QWFLAT = );
> }
Thi