奇怪的Twitter授权错误

时间:2014-09-28 14:45:02

标签: perl twitter

我正在尝试做一个简单的Twitter发布脚本并获得一些奇怪的结果。这是相关的代码:

if ( $access_token eq "" || $access_token_secret eq "" ) {
    $nt = Net::Twitter->new(
        traits          => [qw/API::RESTv1_1 OAuth/],
        consumer_key    => $app_key,
        consumer_secret => $app_secret,
        ssl             => 1,
    );
} else {
    $nt = Net::Twitter->new(
        traits              => [qw/API::RESTv1_1 OAuth/],
        consumer_key        => $app_key,
        consumer_secret     => $app_secret,
        access_token        => $access_token,
        access_token_secret => $access_token_secret,
        ssl                 => 1,
    );
}
if ( !$nt->authorized ) {
    print "You must authorize this app at ", $nt->get_authorization_url, " and enter the PIN below.\n\nPIN: ";
}

代码在$ nt-> get_authorization_url行上失败,并出现以下错误:

Net::Twitter::Role::Oauth::get_authorization_url(): GET https://api.twitter.com/oauth/request_token failed: 401 Unauthorized

这对我没有意义,为什么要求获得授权才能获得授权URL ...

1 个答案:

答案 0 :(得分:1)

Doh找到了原因,这就是当我的VM时钟设置得太远时会发生的情况。感谢提及Leistungsabfall的时间戳让我想到检查它,并希望Twitter错误信息更有意义。