in reply to Sticking output onto the end of your script.

What about:

#! /usr/local/bin/perl -w open OUT, ">> $0" or die "erk: $!\n"; print OUT "$_\n" for @ARGV __END__

- another intruder with the mooring in the heart of the Perl