in reply to SOAP timeout not working
#!/usr/bin/perl -- use strict; use warnings; BEGIN {warn scalar gmtime,"\n";} END {warn scalar gmtime,"\n";} #~ use SOAP::Lite 0.65 +trace => 'debug'; use SOAP::Lite 0.65 on_fault => sub { my $msg = "ERROR: "; my ($soap, $result) = @_; $msg .= ref $result ? $result->faultstring : $soap->transport->status; print STDERR "\tFault -> $msg\n"; }; my $soap = SOAP::Lite->uri("http://localhost/") ->proxy( 'http://localhost/blah/DummyService', timeout => 1 ); $soap->call( SOAP::Data->name('FooService'), SOAP::Data->name('FooVar')->value('$foo')->type('int'), ); __END__ $ perl test.pl Wed Aug 18 23:19:38 2010 Fault -> ERROR: 500 Can't connect to localhost:80 (connect: ti +meout) Wed Aug 18 23:19:39 2010
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: SOAP timeout not working
by Velaki (Chaplain) on Aug 19, 2010 at 13:35 UTC | |
|
Re^2: SOAP timeout not working
by Anonymous Monk on Aug 28, 2020 at 12:05 UTC | |
by Anonymous Monk on Aug 28, 2020 at 19:40 UTC |