Perl

【perl】とある新聞社のサイトから、更新情報を拾ってtweetするbotの作り方 はてなブックマーク - 【perl】とある新聞社のサイトから、更新情報を拾ってtweetするbotの作り方

先日自分がtweetしていました通り、更新情報を拾ってtweetするボットの紹介です。対象のボット第一弾は @webunbot_top3 です。

富山県に関する情報が、もっとネットに溢れたらいいのにな、という思いで作っています。このボットは、北日本新聞社のサイト http://webun.jp/ の県内記事アクセス数トップ3tweetするbotです。

[Apache] “Basic認証に失敗したら、自動でアクセスを拒否るスクリプト”を作ってみた はてなブックマーク - [Apache] “Basic認証に失敗したら、自動でアクセスを拒否るスクリプト”を作ってみた

Apache の Basic 認証に失敗すると、自動的にアクセスを拒否する Perl スクリプトをつくってみました。原理は HTTP コード 401 (Unauthorized) 時に指定の CGI を動作させる→ IP アドレスの記録 → IP アドレスが既定回数を超える → .htaccess でホストを拒否(deny)る、といいうシンプルなもの。