我正在尝试做一个简单的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 ...
答案 0 :(得分:1)
Doh找到了原因,这就是当我的VM时钟设置得太远时会发生的情况。感谢提及Leistungsabfall的时间戳让我想到检查它,并希望Twitter错误信息更有意义。