use warnings; use strict;
my $u = "http://perlmonks.com/?node_id=662172;displaytype=displaycode";
use LWP; print LWP::UserAgent->new->get($u)->content;