2010年 7月 24日 (土)

コード書いてビール飲んで肉を喰らう

午前中: Net::Twitter モジュールと戦う。

twit する際のメッセージを utf8 にしても utf8 になっていない! という，「何を言っているのだ? オマエは?!」な現象に悩みまくる。
結局，以下のコードで OAuth な書き込みができた。

my $nt = Net::Twitter->new(
  traits          => ['API::REST', 'OAuth'],
  consumer_key    => $consumer_key,
  consumer_secret => $consumer_key_secret,
);
$nt->access_token($access_token);
$nt->access_token_secret($access_token_secret);
utf8::decode($message);
my $res = $nt->update({status => $message);

説明はうまくできないが，utf8::decode($message); としているトコロがミソ。
ちゃんとした理由が知りたければ，テキトーにぐぐって，よそのサイトで勉強してくれい!

午後: 飲む飲む!

キリンビアパーク神戸に遊びに行く!

工場見学と試飲を満喫!
サティで買い出しの後，庭でバーベキュー!
飲む飲む，喰う喰う!

ハッピーバースデー

おっと，細君の誕生日でした。
おめでとう!

本日のつぶやき

• 10:29:32 takebot の OAuth 対応完了! utf8 (の引数) で，ハマりまくる。
• 11:07:53 timeline の取得もなんとかできそう。テキトーすぎる perl バンザイ!
• 13:23:18 工場見学! (@ キリンビール 神戸工場) http://4sq.com/9GmEio
• 15:57:05 試飲(おかわり2杯まで)して帰ってくる。さて，今から庭で夕涼みバーベキューだ!
• 16:33:56 Photo: さて，炭もバッチリおきました。飲みますよ。 http://tumblr.com/x5le3x214

Tweet