Select Code to Download

c:\test>perl -MO=Deparse -n -e" print " yourFile
LINE: while (defined($_ = <ARGV>)) {
    print $_;
}
-e syntax OK

## Set the input separator to be '>'; and the output separator to be "
+\n"'
...
## (and ending with a newline. See output separator above.)
    print '>', join(',', @F);
}