$soap = SOAP::Lite -> uri($config{'uri'}) -> on_action(sub {sprintf '"%s%s"', @_}) -> proxy("http://$proxy_to_use/LoadIntraday/LoadIntraDayData.asmx") -> on_fault( sub {} ); #### eval { my $elem = SOAP::Data->name('strFile')->value($soapdata)->type('string'); $result = $soap->call(SOAP::Data->name('LoadIntraDaySwap')->attr({xmlns => 'https://www.primebroker.com/'}) => $elem ); }; # if eval reported an error if ($@) { #send out a email } else { # so no network error but there could be message errors if ($soap->transport->status =~ /Error/){ print $result->faultcode }else { print "Success" } }