use HTTP::Request::Common qw(POST);
my $request = POST($url, 
    [ siteurl => $incoming{site} ]);