package WebserviceFunctions;

=begin WSDL
_DOC Hello
_IN name $string this is the name
_OUT text $string return text
=end WSDL


sub Hello {
    my ($s, $name) = @_;
    return "Hello, $name".$/;
}

=begin WSDL
_DOC Goodbye
_IN name $string this is the name
_OUT text $string return text
=end WSDL

sub Goodbye {
    my ($s, $name) = @_;
    return "Goodbye, $name".$/;
}

1;