use SOAP::Lite +trace => "debug";
use SOAP::WSDL;
use Data::Dumper;
my $soap = SOAP::Lite->service("http://172.16.15.148:8081/Webservice/WebserviceService?wsdl");
print Dumper($soap->serializer->{_namespaces});
print "\n\nRESULT:\n".Dumper $soap->hello('Chewy')."\n\n";