* use Net::Twitter::Lite instead of Net::Twitter
authormitty <mitty@7d2118f6-f56c-43e7-95a2-4bb3031d96e7>
Sun, 14 Nov 2010 05:26:20 +0000 (05:26 +0000)
committermitty <mitty@7d2118f6-f56c-43e7-95a2-4bb3031d96e7>
Sun, 14 Nov 2010 05:26:20 +0000 (05:26 +0000)
git-svn-id: https://lab.mitty.jp/svn/lab/trunk@79 7d2118f6-f56c-43e7-95a2-4bb3031d96e7

twitter/get_oauth.pl

index ca2199c..ec96c19 100755 (executable)
@@ -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,