There's a new OAuth WRAP authentication method for telhosting. Could you change the
Telnic::Base module's new() method to do the following:
my $req = HTTP::Request->new( POST => $args{endpoint} );
$req->header( Accept => 'application/soap+xml' );
$req->content_type( 'application/soap+xml' );
if (defined $args{wrap_access_token}) {
$req->header( Authorization => 'WRAP access_token="'.$args{wrap_access_token}.'"' );
} else {
$ua->credentials( $uri->host_port, 'client-api', $args{user}, $args{pass});
}
RT for rt.cpan.org