1package My::BindingTest; 2 3=begin WSDL 4 5_IN in $string 6_FAULT My::Foo 7_RETURN $string 8_DOC bla bla 9 10=cut 11 12sub testGeneral {} 13 14=begin WSDL 15 16_IN in @string 17_ONEWAY 18 19=cut 20 21sub testOneway {} 22 23sub testWithoutPod {} 24 251; 26