diff --git a/src/warden-client/lib/WardenClientReceive.pm b/src/warden-client/lib/WardenClientReceive.pm index 1544c3bdef107b13237a8fcc3c7dca22aadc69d0..525f365466cb1db8797077e59fc38cd4ec36c1ae 100755 --- a/src/warden-client/lib/WardenClientReceive.pm +++ b/src/warden-client/lib/WardenClientReceive.pm @@ -69,7 +69,10 @@ sub c2s errMsg("Error: server returned empty response." . "\n" . "Problem with used SSL ceritificates or Warden server at $server:$port is down."); } else { # deserialized response from server -> create SOAP envelope and data object - my $response = $soap->deserializer->deserialize($result); + my $response; + eval { + $response = $soap->deserializer->deserialize($result); + } or errMsg($@ . "Received data: " . $result); # check SOAP fault status $response->fault ? errMsg("Server sent error message:: " . $response->faultstring) : return $response; } diff --git a/src/warden-client/lib/WardenClientSend.pm b/src/warden-client/lib/WardenClientSend.pm index b1b3cc09af5a6a8918db1591dce2ed26fd4c22f5..429aeb01c078f523087d66ea808d952f2a1b6995 100755 --- a/src/warden-client/lib/WardenClientSend.pm +++ b/src/warden-client/lib/WardenClientSend.pm @@ -67,7 +67,10 @@ sub c2s errMsg("Error: server returned empty response." . "\n" . "Problem with used SSL ceritificates or Warden server at $server:$port is down."); } else { # deserialized response from server -> create SOAP envelope and data object - my $response = $soap->deserializer->deserialize($result); + my $response; + eval { + $response = $soap->deserializer->deserialize($result); + } or errMsg($@ . "Received data: " . $result); # check SOAP fault status $response->fault ? errMsg("Server sent error message:: " . $response->faultstring) : return 1; }