Perl
use utf8; use Net::Twitter; my $twitter = Net::Twitter->new( username=>"" #ユーザー名 , password=>"" #パスワード ); my $status = '日本語'; { no utf8; $twitter->update({status => $status}); # 文字化けない }