>>333
書き換えが成功した場合は1、失敗した場合は0を返す関数にしたかったので・・

http://dream.my-sv.net/upload/src/up0106.txt

jane用の巡回スクリプトをPerlで組んでるんだけど、とりあえずここまで出来た。
一応動くけど、ほとんどテストしていないから、多分バグだらけだと思う。
一人でシコシコ書いてると、「これで本当にあってるの？」って不安になるな・・