+1  A: 

Add this in to display the XML request/response.

$service->on_debug( sub { print @_ } );
J.J.