2006年2月 1日

[Namazu-users-ja 680] Re: mknmzが止まってしまう

寺西です。

Yukio USUDA wrote:
>
> 私のところでは停止する現象が再現されました。
...
> というように該当部分を切り出したスクリプトで確認できます。
>

> $ touch 'test1 '
> $ perl test.pl 'test1 '
> NG:test1 :No such file or directory
>
> となります。
>
> IO::File の制限のようにも見えますが、うまくいく環境もあるようですね。

うちもダメですが、

use IO::File;
use strict;

my $fname = $ARGV[0];
my $fh = new IO::File;

$fh = new IO::File "$fname", "r";
if (defined $fh) {
print "OK:$fname:\n";
print <$fh>;
$fh->close();
} else {
print "NG:$fname:$!\n";
}

とすれば、うちでは OK になります。
みなさんの環境ではどうなりますか?
--
=====================================================================
寺西 忠勝(TADAMASA TERANISHI) yw3t-trns@xxxxx
http://www.asahi-net.or.jp/~yw3t-trns/index.htm
Key fingerprint = 474E 4D93 8E97 11F6 662D 8A42 17F5 52F4 10E7 D14E

_______________________________________________
Namazu-users-ja mailing list
Namazu-users-ja@xxxxx
http://www.namazu.org/cgi-bin/mailman/listinfo/namazu-users-ja

投稿者 xml-rpc : 2006年2月 1日 20:11
役に立ちました?:
過去のフィードバック 平均:(0) 総合:(0) 投票回数:(0)
本記事へのTrackback: http://hoop.euqset.org/blog/mt-tb2006.cgi/30753
トラックバック
コメント
コメントする




画像の中に見える文字を入力してください。