Select Code to Download

sub as_string { 
   my $val = shift;
...

$xmlrpc->call( 'gimmeallyourmoney', { cardnumber => as_string( 12345 )
+ } );

<?xml version="1.0" encoding="UTF-8" ?>
<methodCall>
...
</param>
</params>
</methodCall>