今日のCPANモジュール

2007-04-01 20:53 第10号

« 前の号 | 目次 | 次の号 »

use Acme::Bleach;

エイプリルフールということで、CPAN のジョークモジュールをいくつか紹介。

CPAN には Acme:: というジョーク専用の名前空間があります。この名前空間が生まれたのは 2001 年。提唱したのは Perl 界の重鎮 Damian で、彼が Bleach というジョークモジュールを作ったときの話らしいです。

最初は Bleach という名前でアップしたのですが、「ジョークモジュールがいろいろ混ざっていくのはいかがなもんかね。ジョーク系は Acme:: という名前空間に入れるようにしませんか」というような感じで提唱。Bleach も Acme::Bleach として再 UP されました。

~~Acme は美味しんぼで言う『究極』とか『至高』とかいうニュアンス~~と、思ってたのですが、ルーニー・テューンズのロードランナーの中に出てくる、コヨーテに怪しい商品を売る Acme 社から来てるそうです（このへん参照）。メールで教えてもらいました。すみません。

単純に Joke:: とかじゃないのがセンスあるなあと思います。

Acme::Bleach は、

use Acme::Bleach;

print "Hello.";

みたいに普通に use Acme::Bleach; した後続けて好きなコードを書いた bleach.pl を作り、実行すると、bleach.pl ファイルそのものが“漂白”され（書き換えられる）、以下のようになります。

use Acme::Bleach;

選択してみるとわかりますが、コードがすべて（バイトにされたのち）タブとスペースと改行で表現されてます。use Acme::Bleach; はデコードとエンコード両方の役割を持っており、このまま perl bleach.pl を実行するとちゃんと Hello. を表示します。とまあ、こうして Acme:: 名前空間ができたおかげで、世界の Perl ハッカーは心置きなく思いついたジョークモジュールを次々 CPAN に投入できるようになったのでした。めでたしめでたし♪ 日本人にもわかりやすい Acme:: 系をいくつか紹介してみます。

Acme::DoubleHelix

Double helix = DNA の二重らせんです。Acme::Bleach と同じようなモジュールですが、先ほどの Hello. を出力するやつがこうなります。

use Acme::DoubleHelix;

 CG
T--A
A---T
A----T
 C----G
  T----A
   A---T
    G--C
     AT
     CG
    C--G
   G---C
  G----C
 C----G
A----T
C---G
G--C
 TA
 CG
C--G
A---T
A----T

# 以下続く

こういうのがお好きなら Acme::EyeDrops が気に入ると思います。