Twitter ベイジアンフィルタプロキシ
Twitter で following が増えてくるにつれて、タイムラインに目を通すのが大変になってきた(という程きちんと見ている訳ではないが)。 さっとタイムラインをなめて面白そうな情報をピックアップしたい時は、「おはよう」とか「風呂入った」とか「トイレ」とかは除外して読みたい(そういう書き込み自体は嫌いじゃないのだが、人生はあまりにも短い)。 Twit や P3:PeraPeraPrv では NG ワード指定ができて、それらを含むステータスは表示しないようにできるのだが、Twitter の書き込みは揺らぎが激しすぎて指定しきれないという弱点がる。 ということでベイジアンフィルタでフィルタリングしてみることにした。 自前で Twitter クライアントを作る気はないので、proxy の形でさっと実装してみた。 #!/usr/bin/perl use strict; use warning
twitterはじめてみた : 404 Blog Not Found
2007年04月11日20:30 カテゴリiTech twitterはじめてみた というわけで、遅ればせながらTwitterをはじめてみた。 Twitter Twitter / dankogai Twitter / dankogai - with friends 一言で言うと、インスタントメッセージのみのSNS。でもSNSでは「ともだち」になるのに相互承認が必要なのに対し、片方向承認、それもクリック一発で「ともだち」になれる点がすごいというかなんというか。あっという魔に50+人の"friends"が出来たのにはあぜ〜ん。もっともほとんどblogなどですでに知っている人でもあるのだが。 APIも竹を割ったように簡単で、コマンドラインツールも簡単に作れた。 Twitterがらみの物置 twget twpost ソースを見れば明らかだけど、使い方は以下のとおり。 ~/.twitterに以下のYA
Net::Twitter
NAME Net::Twitter - Perl interface to twitter.com VERSION This document describes Net::Twitter version 2.12 SYNOPSIS #!/usr/bin/perl use Net::Twitter; my $twit = Net::Twitter->new({username=>"myuser", password=>"mypass" }); my $result = $twit->update({status => "My current Status"}); my $twit->credentials("otheruser", "otherpass"); my $result = $twit->update({status => "Status for otheruser"}); my
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
http://gustaf.symbiandiaries.com/weblog/comp/Twitter-posting-script.html
