package Wordbank::DCI::Server;

use vars qw(@ISA);
@ISA = qw(SOAP::Server::Parameters);

use strict;
use warnings;
use Carp;

sub hello {
    my $self = shift;
    print STDERR 'Module INC: ', join(' ', @INC), "\n";
    return "Hello, world\n";
}    
1;