use SOAP::Lite;
my $VAR = bless( {
  'keys' => bless( [
    'name',
    'addr',
    'phone'
  ], 'string' ),
  'values' => bless( [
    'bubba',
    'home',
    '555-1212'
  ], 'string')
}, 'HashMapBean' );

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

##</code><code>##

use SOAP::Lite;
my $VAR = bless( {
  'keys' => bless( [
    'name',
    'addr',
    'phone'
  ], 'ArrayOf_xsd_string' ),
  'values' => bless( [
    'bubba',
    'home',
    '555-1212'
  ], 'ArrayOf_xsd_string')
}, 'HashMapBean' );

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

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