Update: nicer error-handling code, correction of syntax errors.

Sorry I got sidetracked by other things (or rather I got retracked from this side track :-) but I returned to this subject and your advice was invaluable.

In the end though I used RPC::XML which is just as easy to use and apparently more complete. Here is what my example code would look like with this module:

use RPC::XML::Client;

my $client = RPC::XML::Client->new('http://www.advogato.org/XMLRPC');
my $result = $client->send_request('test.guess');
die $result unless defined($result);
die $result->code . ': ' . $result->string if $result->is_fault;
print join(' ',  @{$result->value}), "\n";
[download]

--
જલધર