namazu-dev(ring)
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: mknmz in Win32
白井です。(基本的にはなにも理解できていません)
手元の青らくだを読んだら、
From: Satoru Takabayashi <satoru-t@xxxxxxxxxxxxxxxxxx> さん曰く
Subject: [namazu-dev 1532] Re: mknmz in Win32
Message-ID: <200002100406.NAA08282@xxxxxxxxxxxxxx>
Date: Thu, 10 Feb 2000 13:07:52 +0900
高林> >上記の高林さんのパッチを 'map' => 'grep' に変えたら
高林>
高林> なぜだろう? map が正しいはずだけど。
たしかに map じゃないといけないですね。調べてからやればよかった
です。ごめんなさい。
# s/\r$//g; の方がいいんじゃないですか？というのはちょっとおいて
# おいて、
高林> [namazu-dev 1511] 広瀬さん
高林> | 高林さんの patch でばっちりのはずです。。。
高林>
高林> とのことですが。どなたか調べてもらえません?
なぜか、
if (($SYSTEM eq "MSWin32") || ($SYSTEM eq "os2")) {
map {
s/\r//g;
s!([\x81-\x9f\xe0-\xef][\x40-\x7e\x80-\xfc]|[\x01-\x7f])!
$1 eq "\\" ? "/" : $1!gex;
} @targets;
と書くと、副作用(？) で @targets の中身もちゃんと変わっているようです。
# c:\\hoge\\... + CRLF の形式を入れて、上記以降で
# print "\n", @targets, "\n";
# して確かめました。
WinNT4.0 上で
% perl -v
This is perl, version 5.005_03 built for MSWin32-x86-object
(with 1 registered patch, see perl -V for more detail)
Binary build 522 provided by ActiveState Tool Corp. http://www.ActiveState.com
Built 09:52:28 Nov 2 1999
がいけないのかしら？ だけど、上記 URL を見に行ったらこれが最新版
でした。
--
白井秀行＠全然わかっていません (_ _)