« 2004年11月03日 | メイン | 2004年11月05日 »

2004年11月04日

ISBN のチェックサム

978 から始まるバーコードは ISBN なのですが、ヘッダ情報がくっついていて邪魔です。ということで、ヘッダ情報を除くコードを Perl で書いてみました。これでバーコードから ISBN を算出できる!

まぁ。全然すごいことではないけどね。単に ISBN のチェックサムを算出してくっつけるだけ。

if ($code =~ /^978(\d)(\d)(\d)(\d)(\d)(\d)(\d)(\d)(\d)/) {
    my $c = ($1 + $2 * 2 + $3 * 3 + $4 * 4 + $5 * 5 + $6 * 6 + $7 * 7 + $8 * 8 + $9 * 9) % 11;
    if ($c == 10) {
        $c = "X";
    }
    $code = $1 . $2 . $3 . $4 . $5 . $6 . $7 . $8 . $9 . $c;
}

$code には、対象となるバーコードの数字が入っているものとします。なんか、とっても汚い書き方かも。

EAN(JAN)は、変換できませんので。書籍の下側のバーコードのことね。今回のは、上側のバーコードのみ対応。

03:21 | コメント (0) | トラックバック | Programming

CEEK.JP Labs をはじめました

STORE Barcode to Review

別にすごいものを公開しているわけでも無いけど、軽くリリースできるような環境を整えたくって CEEK.JP Labs を作ってみた。元々は、ベータ版公開用に作ろうと思っていたんだけど、使う人からすればベータも正式も関係ないだろうし、作る人からすれば、正式でもどんどん改良を加えていきます。ということで、軽くリリースできる環境を。

とりあえず、以下の2つをリリースしました。

・CEEK.JP STORE
・CEEK.JP Barcode to Review

前者は、前々からひっそりと公開していました。つーか、モジュールの関係で日本語が上手く扱えないんだよね。あと、開発言語が PHP なのは、リハビリの意味合いがあるんだけど、日本語が扱えないおかげで、全然リハビリにならない。

後者は、前に作ろうと思っていたけど、もう、他で公開されちゃってるシステム。何か、いっつもタイミングを逃しているなぁ。と思ったり。こまめの更新とすばやい開発を心がけよう。ちなみに、ちょっと変わった拡張を行う予定です。でも、地域限定になると思う。

【関連情報】
・CEEK.JP Labs
 http://labs.ceek.jp/

02:57 | コメント (0) | トラックバック | Development

夜食を買いに行こう

お腹すいた。ということで、昨日(3日)の食事内容です。
夜は、チャーハンを作った。微妙に賞味期限が切れているっぽい玉子が残っていたので、作ることを決意した。チャーハンが薄味なのが許せないので、炒めているときに醤油を入れたら、あまり美味しくなくなった。食べるときにかけるようにしよう。

自宅 (夜)
 チャーハン, コーンスープ

02:44 | コメント (2) | トラックバック | Meal