#!/usr/bin/perl -w
use strict;
use Frontier::Client;
my $server = Frontier::Client->new('url' => 'http://somexmlrpcsite.com/service.php', 'encoding' => 'ISO-8859-1', 'debug' => 1);
my $method = 'search';
my %paramfields = [{
'this' => 'thisvalue',
'that' => 'thatvalue',
'something' => 'somevalue'
}];
my $result = $server->call($method, %paramfields);
print "My result is \n\n: $result\n";
####
---- request ----
searchres
thisthisvalue
thatthatvalue
somethingsomevalue
####
---- request ----
search
this
thisvalue
that
thatvalue
something
somevalue
####