=begin WSDL

_IN name $string
_RETURN $string

=cut

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