    	#!/usr/bin/perl 
     	# Testing sum()
     	
     	use strict;
     	use warnings;
        use RPC::XML::Client;
	
    	
		sub sum {
    	  my ($args1,$args2) = @_;
    	  print "inside sum";
    	  return $args1 + $args2;
    	}
        
	    my @args = (9,9);
    	print "The numbers to be added are :@args\n";
        my $client = new RPC::XML::Client
        'http://lovalhost:80';
       my $req = RPC::XML::request->new('sum', @args);
       my $res = $client->send_request($req);
	   print "The result is : $res";

##</code><code>##

The numbers to be added are :9 9
The result is :
syntax error at line 1, column 54, byte 54:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 Final//EN">
=====================================================^
<HTML>
 at C:/Perl/site/lib/RPC/XML/Client.pm line 394