5

Strawberry PerlまたはActivePerlのいずれかを使用して、Windows で実行したい Perl スクリプトがあります。私は気にしません。ただし、このスクリプトはflock()呼び出しを使用しており、これらのバージョンの Perl には含まれていないようです。

これを起動して実行するのを手伝ってくれる人はいますか?

4

2 に答える 2

6

Fcntlモジュールはインストールされていますか？これを試して：

perl.exe -MFcntl -e 1

問題が発生する場合は、Fcntlモジュールがインストールされていません。それが文句を言わない場合、あなたはFcntl :: flockにアクセスできるので、これをスクリプトに入れてください：

use Fcntl qw(:DEFAULT :flock);

そして、あなたは行き​​ます。

于 2009-01-25T01:24:02.253 に答える
1

perldoc -f flock を使用して、サポートされていることを確認してから、指定された例を調べて、関数の使用基準を確認してください。以下は perldoc からのコピーです。

C:>perldoc -f 群れ

 use Fcntl ':flock'; # import LOCK_* constant

 sub lock {
     flock(MBOX,LOCK_EX);
     # and, in case someone appended
     # while we were waiting...
     seek(MBOX, 0, 2);
 }

 sub unlock {
     flock(MBOX,LOCK_UN);
 }

 open(MBOX, ">>/usr/spool/mail/$ENV{'USER'}")
于 2009-01-25T09:32:33.983 に答える