Select Code to Download

use SOAP::Lite;
my $VAR = bless( {
  'keys' => bless( [
...
}, 'HashMapBean' );

my $xml = SOAP::Serializer->serialize($VAR);

use SOAP::Lite;
my $VAR = bless( {
  'keys' => bless( [
...
my $xml = SOAP::Serializer->serialize($VAR);

print "\n$xml\n\n";