Select Code to Download

use LWP::UserAgent;
$ua = new LWP::UserAgent;
...
  $r = new HTTP::Request('GET', $url);
  $res = $ua->request($r);
  $this = $res->{_content};

use LWP::Simple;

  my $this = get $url;
  die "Couldn't get $url" unless defined $content;