Select Code to Download

  # I usually molest $raw_request_string a little here...
  my $request = HTTP::Request->parse($raw_request_string);

  my $soap = SOAP::Transport::HTTP::Server
     -> new(YOUR_SOAP_SPECIFIC_ARGS) 
     -> dispatch_to(YOUR_CLASS);

  # and I usually munge headers/SOAPaction here...
  $soap->request($request);

  $soap->handle();

  my $response = $soap->response;