|
Re: Any Perl Experts?
Soz was away for lunch...
take a looksie @ perldoc RPC::XML::Client
use the following example to get up n running.
NAME
RPC::XML::Client - An XML-RPC client class
SYNOPSIS
require RPC::XML;
require RPC::XML::Client;
$cli = RPC::XML::Client->new('http://www.localhost.net/RPCSERV');
$resp = $cli->send_request('system.listMethods');
print ref $resp ? join(', ', @{$resp->value}) : "Error: $resp";
DESCRIPTION
This is an XML-RPC client built upon the RPC::XML data classes, and
---------- Post added at 14:11 ---------- Previous post was at 14:08 ----------
#!/usr/bin/perl
require RPC::XML;
require RPC::XML::Client;
$cli = RPC::XML::Client->new('http://www.localhost.net/RPCSERV');
$cli->send_request('authenticate',RPC_STRING('user'),RP C_STRING('pass'));
$resp = $cli->send_request('system.listMethods');
print ref $resp ? join(', ', @{$resp->value}) : "Error: $resp";
EDIT : I made up the authenticate line try it with and without the RPC_STRING wrapper
|