Help for this page
Select Code to Download
Select
or
download this
print "Query: $line" if ($line =~ /\S/);
Select
or
download this
next unless ($line =~ /\S/); print "Query: $line";