##

$request = POST 'http://www.server.com', Content => [ /process.create => 'loc=AL&cat=4' ];
my $response = $ua->request($request);

##

##

$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);