my $request=HTTP::Request->new(GET => $lstrURL);