use LWP::FileHandle;
lwpopen JAPHY, GET => 'http://www.crusoe.net/~jeffp/';
while (<JAPHY>) {
  print;
}
lwpclose JAPHY;