$lynx -dump "http://www.perlmonks.com/index.pl?node_id=371944&displaytype=displaycode" | perl - one two

hello
one two

##</code><code>##

perl -MLWP::Simple -e "getprint 'http://www.perlmonks.com/index.pl?node_id=371945&displaytype=displaycode'"  | perl - one two
hello
one two

##</code><code>##

#!/usr/local/bin/perl
print "hello\n";
print join (' ',@ARGV);
print "\n";