#! /usr/bin/perl

use strict;
use lib '/var/www/perl-bin';
use SOAP::Transport::HTTP;

print STDERR ("service called\n");

SOAP::Transport::HTTP::CGI
    -> dispatch_to('testSoap')
    -> handle;
exit(0);