From: mitty Date: Sun, 14 Nov 2010 05:26:20 +0000 (+0000) Subject: * use Net::Twitter::Lite instead of Net::Twitter X-Git-Tag: r89-trunk~11 X-Git-Url: http://lab.mitty.jp/git/?a=commitdiff_plain;h=2d5b7493cf4f29ac915ba3881d15170144768948;p=lab.git * use Net::Twitter::Lite instead of Net::Twitter git-svn-id: https://lab.mitty.jp/svn/lab/trunk@79 7d2118f6-f56c-43e7-95a2-4bb3031d96e7 --- diff --git a/twitter/get_oauth.pl b/twitter/get_oauth.pl index ca2199c..ec96c19 100755 --- a/twitter/get_oauth.pl +++ b/twitter/get_oauth.pl @@ -2,7 +2,7 @@ use strict; use warnings; use utf8; -use Net::Twitter; +use Net::Twitter::Lite; use YAML::Tiny; my $config = (YAML::Tiny->read('config.yml'))->[0]; @@ -12,7 +12,7 @@ my $consumer_key_secret = $config->{'consumer_secret'}; my $access_token = $config->{'access_token'}; my $access_token_secret = $config->{'access_token_secret'}; -my $nt = Net::Twitter->new( +my $nt = Net::Twitter::Lite->new( traits => ['API::REST', 'OAuth'], consumer_key => $consumer_key, consumer_secret => $consumer_key_secret,