Net::Twitter::Liteを使うとこんなにカンタン！！
ほんとに５行のコードでつぶやけてしまいました。#!/usr/bin/perl
use Net::Twitter::Lite;
use utf8;
my $nt = Net::Twitter::Lite->new(username => 'DQNEO', password => 'hoge');
my $result = eval { $nt->update('ついったー！！') };
warn "$@\n" if $@;
購読する
コメントする