SOAP::WSDL errors ?

Hello,

Can anyone point me in the right direction, I am trying to use the
SOAP::WSDL module however it is error out before I ever get to use it:

--snip--
#!/usr/bin/perl

#use strict;
use diagnostics;
use warnings;
use SOAP::Lite +trace => [transport => \&log_data];
use LWP::UserAgent;
use SOAP::WSDL;


sub  SOAP::Transport::HTTP::Client::get_basic
_credentials {
return 'testuser' => 'test123';
}

my $soap = SOAP::WSDL->new(
wsdl => 'file:./test.wsdl',
no_dispatch =>1);

#$soap->wsdlinit( caching => 1);

$soap->wsdlinit();
--snip--

The following error is printed to STDERR:

--snip--
Can't call method "endpoint" on an undefined value at
/usr/lib/perl5/site_perl/5.8.5/SOAP/WSDL.pm line 30 (#1)
(F) You used the syntax of a method call, but the slot filled by the
object reference or package name contains an undefined value.
Something
like this will reproduce the error:

$BADREF = undef;
process $BADREF 1,2,3;
$BADREF->process(1,2,3);

Uncaught exception from user code:
Can't call method "endpoint" on an undefined value at
/usr/lib/perl5/site_perl/5.8.5/SOAP/WSDL.pm line 30.
at /usr/lib/perl5/site_perl/5.8.5/SOAP/WSDL.pm line 30
 SOAP::WSDL::wsdlinit('SOAP::WSDL=HASH(0x
88fc128)') called at
./soap_perl_example.pl line 46
--snip--



--
Michael Gale

Red Hat Certified Engineer
Network Administrator
Pason Systems Corp.