*SOAP::WSDL::Transport::HTTP::get_basic_credentials = sub {
    return ($user, $password);
 };