package Warden::ApacheDispatch;
  use SOAP::Transport::HTTP;
my $server = SOAP::Transport::HTTP::Apache->dispatch_to('.','Warden');
  sub handler {
  $server->handler(@_) 
  }
1;