on_fault => sub { my($soap, $res) = @_;
    eval { die ref $res ? $res->faultstring : $soap->transport->status };
    return ref $res ? $res : new SOAP::SOM;
  };