Permission 666

[Perl]ATNDの参加者IDをTwitterでフォローする

30分ででっち上げたのでXMLのパースとかTwitterIDの正規表現とかいろいろ問題がありますが、何となく動いたので。
ATNDのID = TwitterのIDじゃないので誤フォローもありえます。
PLAIN TEXT [...]

[Perl]localtimeで日本時間にならない場合の対処

Perlのlocaltime関数を使って、以下のようなコードで日本時間を出力しようとしても、何らかの原因（海外から取り寄せたサーバでタイムゾーンが違うとか）で正しく出力されない場合がある。
▼環境によってはうまく動かない [...]

[Perl]ドコモのiメニュー検索のキーワードを取得する

ドコモ2009夏モデルのリファラー出力記念。
ドコモのiメニューで検索した時の検索キーワードを取得します。（たぶん）
$uriの値は実際はちょっと異なります。
PLAIN TEXT
PERL:

use stric [...]

[Perl]新型インフルエンザの状況を調べる

職場から「新型インフルエンザの状況が第二段階（国内発生早期）またはそれ以上の段階となった場合はマスクをして来い」とお達しが出ましたが、いちいち厚生労働省のページを見に行くのがメンドくさかったのでツール作った。
2009/ [...]

[Perl]PerlからExcelのグラフを作る

アクセス解析の専用ソフトなんて高くて買ってもらえないので、Excelでやる夫。
Win32::OLEを使ってVBAをPerlに置き換えていく感じで作っていく。
ちなみにSJISでソース書かないと日本語化けます。
PLAI [...]