import SOAP-WSDL 2.00_33 from CPAN

git-cpan-module:   SOAP-WSDL
git-cpan-version:  2.00_33
git-cpan-authorid: MKUTTER
git-cpan-file:     authors/id/M/MK/MKUTTER/SOAP-WSDL-2.00_33.tar.gz

lib/SOAP/WSDL/Generator/Template/XSD/Interface/Operation.tt

@@ -4,7 +4,12 @@ sub [% operation.get_name %] {
     return $self->SUPER::call({
         operation => '[% operation.get_name %]',
         soap_action => '[% operation.first_operation.get_soapAction %]',
-        style => '[% operation.get_style || binding.get_style %]',
+        style => [% style = operation.first_operation.get_style || binding.get_style;
+    IF style != "document";
+        THROW NOT_SUPPORTED "SOAP::WSDL supports document encoding only - $style found";
+    END;
+-%]
+'[% style %]',
         body => {
             [% INCLUDE Interface/Body.tt( item = operation.first_input.first_body ); %]
         },