./rpcxmlklient.pl 
$VAR1 = \bless( {
                   'answer' => bless( do{\(my $o = 'OK bejby')}, 'RPC::XML::string' )
                 }, 'RPC::XML::struct' );
$VAR1 = \{
            'answer' => 'OK bejby'
          };
OK bejby