use strict;

print "Content-type: text/html\n\n";

my $client = SOAP::Lite->new(
   uri => 'http://www.example.com/API/Translator/',
   proxy => [
       'http://sandbox.example.net/api/',
       credentials => [
           'sandbox.example.net:80',   # hostname:port
           'EXAMPLE',                  # realm
           'user' => 'password'        # username => password
       ]
   ]
);

my %address = (
    'line1' => '1234 Main Street',
    'line2' => 'Apartment X',
    'city' => 'Richmond',
    'state' => 'Virginia',
    'zip' => '23220'
);

# Regardless of how or what I pass, I still get the same error:
my $result = $client->normalize(SOAP::Data->name('address')->value(\%address));
#my $result = $client->normalize(\%address);
#my $result = $client->normalize('HEY!');

unless ($result->fault) {
    print $result->result();
  } else {
    print join ', ', 
      $result->faultcode, 
      $result->faultstring;
  }