use LWP::UserAgent;

my $ua       = LWP::UserAgent->new;
my $file     = '/tmp/temp.txt';
my $url      = 'http://foo.com/index.htm';
my $request  = HTTP::Request->new( 'GET', $url );
my $response = $ua->request( $request, $file ); 

open FILE, $file or die $!
while (<FILE>) {
.....