...
my $req = RPC::XML::request->new('search', @paramfields);
my $resp = $client->send_request($req);
print "Response is $resp\n";
print Dumper(\$resp);
### NOW I WANT TO GET SOME VALUES OUT
### but I can't figure it out!
### am I missing some critical documentation?
### I tried to read on CPAN but that didn't help or make sense to me
####
Response is RPC::XML::array=ARRAY(0x8465fb0)
$VAR1 = \bless( [
bless( do{\(my $o = '333333333333333')}, 'RPC::XML::int' ),
bless( do{\(my $o = '0.158333')}, 'RPC::XML::double' ),
bless( [
bless( {
'' => bless( do{\(my $o = '')}, 'RPC::XML::string' ),
'thiskey' => bless( do{\(my $o = 'heyheywearethemonkeys')}, 'RPC::XML::string' ),
'that' => bless( do{\(my $o = '6')}, 'RPC::XML::int' ),
'thistoo' => bless( do{\(my $o = 'Joe')}, 'RPC::XML::string' ),
'thattoo' => bless( [
bless( do{\(my $o = 'item1')}, 'RPC::XML::string' ),
bless( do{\(my $o = 'item2')}, 'RPC::XML::string' ),
bless( do{\(my $o = 'item3')}, 'RPC::XML::string' )
], 'RPC::XML::array' ),
'something' => bless( do{\(my $o = '')}, 'RPC::XML::string' ),
'somethingelse' => bless( do{\(my $o = 'EFG')}, 'RPC::XML::string' ),
'hello' => bless( do{\(my $o = '2003')}, 'RPC::XML::int' )
}, 'RPC::XML::struct' ),
bless( {
'' => bless( do{\(my $o = '')}, 'RPC::XML::string' ),
'hola' => bless( do{\(my $o = '2940')}, 'RPC::XML::string' ),
'howdy' => bless( do{\(my $o = '6')}, 'RPC::XML::int' ),
'doody' => bless( do{\(my $o = 'Smithton')}, 'RPC::XML::string' ),
'a_list' => bless( [
bless( do{\(my $o = 'getitem1')}, 'RPC::XML::string' ),
bless( do{\(my $o = 'getitem2')}, 'RPC::XML::string' ),
bless( do{\(my $o = 'getitem3')}, 'RPC::XML::string' )
], 'RPC::XML::array' ),
'hi' => bless( do{\(my $o = '')}, 'RPC::XML::string' ),
'yo' => bless( do{\(my $o = 'HIJ')}, 'RPC::XML::string' ),
'ciao' => bless( do{\(my $o = '1951')}, 'RPC::XML::int' )
}, 'RPC::XML::struct' ),
], 'RPC::XML::array' )
], 'RPC::XML::array' );
####
print $result[0] or $result[4]{'thiskey'}, "\n";
####
my @newresult = $result;
print $newresult[0][0], "\n";
####
$VAR1 = \[
'this',
'that',
'hmmm',
'ok',
[
{
'' => '',
'somelist' => [
'item1',
'item2',
'item3'
],
'thiskey' => 'nomoremonkeysjumpingonthebed',
'hiii' => '0.200000',
},
{
'' => '',
'somelist' => [
'item1',
'item2',
'item3'
],
'thiskey' => 'nomoremonkeysjumpingonthebed',
'hiii' => '0.200000',
},
]
];