use HTTP::Request::Common;
my $ua = LWP::UserAgent->new;
$ua->request(POST $url, [DataOne => 'A', DataTwo => '1+', DataThree => 20]);