How about:

#!/usr/bin/perl -w
use strict;

print "Hello, world\n";
__END__
Hello, world
Hello, world
Hello, world
...
[download]

Then redirect the STDOUT at the commandline:

#helloworld.pl >> helloworld.pl
[download]