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

##</code><code>##

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