検証用のコード

検証用のコードを用意。fork() で 3 つの子プロセス（疑似プロセス）を生成し、それぞれのプロセス内で Text::Kakasi を使った分かち書きを 10000 回実行するというもの。ロックが正しく行われていれば問題は起こらないが、失敗していると perl.exe が異常終了する。

その後、Windows 98 で検証してみたところ、

flock() unimplemented on this platform at POPFile/Mutex.pm line 79.

とのメッセージが表示されることが判明。やはり、Windows 98 では flock() が使用できないようだ。どのプラットフォームでも動くようにするためには、別の方法を採らなければいけないということか。