X-Git-Url: http://lab.mitty.jp/git/?a=blobdiff_plain;f=twitter%2Fget_oauth.pl;h=ec96c197741aca2226eea591647aededbf804eae;hb=e3a58e8f0a3193645f4eb999e240a86a2f3e2a21;hp=505d22888aedf038a5e480a0c14a9a818805d496;hpb=1680a86dbcb5e3096eb1dc0a03da0d637131aa5b;p=lab.git diff --git a/twitter/get_oauth.pl b/twitter/get_oauth.pl index 505d228..ec96c19 100755 --- a/twitter/get_oauth.pl +++ b/twitter/get_oauth.pl @@ -2,17 +2,17 @@ use strict; use warnings; use utf8; -use Net::Twitter; +use Net::Twitter::Lite; use YAML::Tiny; my $config = (YAML::Tiny->read('config.yml'))->[0]; my $consumer_key = $config->{'consumer_key'}; -my $consumer_key_secret = $config->{'consumer_key_secret'}; +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,