use HTTP::Request::Common;
$ua = LWP::UserAgent->new;
$ua->request(POST 'http://remotescript.com',[
name   => '$name', 
email  => '$email', 
subject => '$subject', 
body   => '$body']);