perl - Facebook::Graph 无法获取访问 token TLS 支持不可用

Question

我正在尝试将 facebook api 与 perl 模块 Facebook::Graph 一起使用

第一步，获取che代码:

my $fb = Facebook::Graph->new(
        app_id          => 'xxxx',
        secret          => 'xxxx',
        postback        => 'http://xxxxx/fb_postback',
    );

      my $uri = $fb
        ->authorize
        ->uri_as_string;

现在我有了代码参数并尝试获取身份验证 token :

$fb->request_access_token($RETURNED_PARAM_CODE);

服务器记录此错误:

 Could not fetch access token: TLS support not available on this system at perl5/site_perl/5.10.0/Facebook/Graph/AccessToken/Response.pm line 26.

有任何想法吗？

Answer 1

安装 Net::SSLeay和 AnyEvent::TLS , 或更好的升级 Facebook::Graph >= 1.0502。