There are issues with generating a soap call directly from wsdl.

I get an answer with this code:

$soap = SOAP::Lite->new(
            uri   => ("http://www.webserviceX.NET"),
            proxy => ('http://www.webservicex.com/globalweather.asmx')
+,
               );
$soap->on_action(sub{join '/',@_ });
my $city = SOAP::Data->name(CountryName => 'Singapore');
my $som = $soap->GetCitiesByCountry($city);

if (my $match = $som->match('/Envelope/Body/GetCitiesByCountryResponse
+/')) {
  print "match is OK: $match\n";
  my $result = $som->valueof('//GetCitiesByCountryResponse/GetCitiesBy
+CountryResult');
  print Dumper($result);
} else {
  print "match not OK: $match\n";
}
[download]

printing...

match is OK: 1
$VAR1 = '<NewDataSet>
  <Table>
    <Country>Singapore</Country>
    <City>Singapore / Paya Lebar</City>
  </Table>
  <Table>
    <Country>Singapore</Country>
    <City>Singapore / Changi Airport</City>
  </Table>
</NewDataSet>';
[download]