ほ〜
クーポンコードの打ち間違えを防ぐために工夫した話 - クックパッド開発者ブログ
一方、perl では、Algorithm::LUHN が利用できるらしい。
http://search.cpan.org/perldoc?Algorithm%3A%3ALUHN
perlでクレジットカードのvalidationといえば、Business::CreditCard ですが、
ルーン・アルゴリズムを内包してるんですかねぇ
http://search.cpan.org/perldoc?Business%3A%3ACreditCard
