$contentdata = '/process.create=loc=AL&cat=4';
$encoded = uri_escape($contentdata);
$request = new HTTP::Request('POST', 'www.server.com');
$request->content_type('application/x-www-form-urlencoded');
$request->content($encoded);
my $response = $ua->request($request);