use Modern::Perl;
use LWP::Simple;

my $content = get('http://www.sec.gov/Archives/edgar/data/935226/000114420411058092/0001144204-11-058092-index.htm');

say $content;