testlink XMLRPC api

[aostad]

When I run the clientGetProjects.pl, I get following error:
c:\perl clientGetProjects.pl
Test Link XML-RPC API
Testing method: getProjects()
Testing Server: http://testlink/lib/api/xmlrpc.php

Can't use an undefined value as a HASH reference at C:/Perl/site/lib/JSON/RPC/Client.pm line 43.

I have printed the value of variable at the line of error:
JSON::RPC::Client=HASH(0x34908c)->allow_call->{ send_request }

The error happens in Client.pm:

sub AUTOLOAD {
my $self = shift;
my $method = $JSON::RPC::Client::AUTOLOAD;
$method =~ s/.*:://;
return if ($method eq 'DESTROY');
$method =~ s/^__(\w+)__$/$1/; # avoid to call built-in methods (ex. __VERSION__ => VERSION)

#error happens in this line:
unless ( exists $self->allow_call->{ $method } ) {
Carp::croak("Can't call the method not allowed by prepare().");


Any help is appreciated.