#!/usr/bin/perl --

use SOAP::Transport::HTTP;

SOAP::Transport::HTTP::CGI
        -> dispatch_to('test')
        -> handle();

package test;

sub function { return \%ENV; }