#! /usr/local/bin/perl -w

open OUT, ">> $0" or die "erk: $!\n";
print OUT "$_\n" for @ARGV
__END__