use SOAP::Transport::HTTP

my $old_response = \&SOAP::Transport::HTTP::Server::response;
*SOAP::Transport::HTTP::Server::response = sub {
    my $resp = $old_response->( @_ );
    $resp->headers->header('Access-Control-Allow-Origin' => '*'); # is this wise?!
    return $resp;
};