Windows의 Perl 용 Flock ()는 어디에 있습니까?
문제
Windows에서 실행하고 싶은 Perl 스크립트가 있습니다. 딸기 perl 또는 ActivePerl; 나는 어느 쪽이 상관 없다. 그러나이 스크립트는 사용합니다 flock()
Perl 버전 중 하나에 포함되지 않은 통화.
누구든지 이것을 만들고 달리기를 도울 수 있습니까?
해결책
FCNTL 모듈이 설치되어 있습니까? 이 시도:
perl.exe -MFcntl -e 1
불만이있는 경우 FCNTL 모듈이 설치되지 않았습니다. 불평하지 않으면 fcntl :: 플록에 액세스 할 수 있으므로 스크립트에 넣으십시오.
use Fcntl qw(:DEFAULT :flock);
그리고 당신은 간다.
다른 팁
Perldoc -f 플록을 사용하여 지원되는 것을 확인한 다음 주어진 예제를 살펴보고 기능의 사용 기준을 알 수 있습니다. 여기에서는 펄드 옥에서 복사했습니다.
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'}")
제휴하지 않습니다 StackOverflow