My oft repeated Mantra for LWP: "use HTTP::Request::Common" and "perldoc lwpcook". Repeat as necessary.

use LWP::UserAgent;
use HTTP::Request::Common;
my $ua = LWP::UserAgent->new;
my $response = $ua->request(POST "http://tom.com", [form1 => value1, f
+orm2 => value2],
  Referer => 'http://bob.com/fun.htm');
[download]

-- Randal L. Schwartz, Perl hacker