以前のリビジョンの文書です


A PCRE internal error occured. This might be caused by a faulty plugin

====== Twitter APIで自分のステータスを更新する ====== //このページは2007年06月16日に書かれた物です// Twitterの公式APIを利用して、Perlからステータスを更新することが可能だ。[[http://search.cpan.org/~mmims/Net-Twitter-4.01000/lib/Net/Twitter.pod|Net::Twitterモジュール]]を使えばいとも簡単に実現できる。 Net::Twitterモジュールはもちろん標準では入らないので別途インストールする。同時に「LWP::UserAgent」「JSON::Any」も必要だ。 ===== サンプル ===== <code perl> ;# ;#PerlからTwitterで発言する ;# #--------------------------------------# #モジュール #--------------------------------------# use strict; use Net::Twitter; use Jcode; #------------------------# # ログイン # #------------------------# my $twit = Net::Twitter->new( username=>"katsube" #ユーザー名 , password=>"hogehoge" #パスワード ); #------------------------# # 発 言 # #------------------------# #-- 発言するセリフの準備 --# my $text = 'ふがふが'; #-- UTF8へ --# Jcode::convert(\$text, 'utf8'); #-- Twitterへ送信 --# my $result = $twit->update($text); </code> ===== 実行結果 ===== {{:twitter:twitter_update.jpg|}} 発言は必ずUTF8で行うこと。これだけ気をつけておけば日本語も問題なく通る。書くまでも無いと思うが、ログインしているユーザーのステータスを、一回のアップデートにつき一回の更新が行える。 また前回と全く同じ文字列ははじかれるようなので(未検証)、更新がされない場合は適当に文字列を変えてトライすると良い。 {{tag>CGI・Perl例文集 Perl API TwitterAPI }}

コメント

コメントを入力. Wiki文法が有効です:
Y U P X Q