[Perl] failed: Bad file descriptor

[luis medrano]

Lista,

Estoy tratando de correr este codigo pero me sale este error "failed:
Bad file descriptor".Alguna idea de que estoy haciendo mal?

Saludos,
Luis

my $res = XMLRPC::Lite
   -> proxy($proxyurl)
         -> call('metaWeblog.newPost', $blogid, $username, $password,
           {
				'title'=>$title,
                                'description'=>$content,
                                'mt_allow_comments'=>1,
                                #'mt_allow_pings'=>1
                                },
                                1
                    )
                    ->result;
                


if (defined ($res))
{
   print "--success--\n";
   print Dumper ($res);
}
else
{
   print "failed: $!";
}