« 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 をはじめました

別にすごいものを公開しているわけでも無いけど、軽くリリースできるような環境を整えたくって 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日)の食事内容です。
夜は、チャーハンを作った。微妙に賞味期限が切れているっぽい玉子が残っていたので、作ることを決意した。チャーハンが薄味なのが許せないので、炒めているときに醤油を入れたら、あまり美味しくなくなった。食べるときにかけるようにしよう。
自宅 (夜)
チャーハン, コーンスープ