#!/usr/bin/perl -w
use strict;
use LWP::Simple;

my $result = get("http://server.com/document?param=value");

##</code><code>##

#!/usr/bin/perl -w
use strict;
use LWP::UserAgent;
use HTTP::Request;
use URI;

my $ua = new LWP::UserAgent;
my $url = URI->new("http://server.com/document");
$url->query->form(param => 'value');
my $req = HTTP::Request->new(POST => $url);
my $resp = $ua->request($req);
print STDERR $resp->error_as_HTML() if $resp->is_error();