use LPW::Simple;
  ...
  print "Content-type: text/html\n\n";
  print get("http://www.yahoo.com/");