Select Code to Download

WSDL doesn’t works only on perl 5.6 and not 5.8. UNIVERSAL::AUTOLOAD i
+s broken in perl 5.8 and it is used by Class::Hook upon wich WSDL::Ge
+nerator depends.

package WebserviceFunctions;
sub new { bless {}, shift; }
...
    my ($s, $name) = @_;
    return "Goodbye, $name".$/;
}

#!/usr/bin/perl -w     

...

print $pod->WSDL;
1;