Frage zu flock() - #59782 (Allgemeines zu Perl)

betterworld

2005-11-06 03:24

User since
2003-08-21
2613 Artikel
ModeratorIn

user image

Warum probierst Du es nicht einfach aus? Nimm Dir eine Shell, gib ein:

Code: (dl )

perl -MFcntl=:flock -we 'open F, ">lock" or die "open"; flock(F, LOCK_EX) or die "flock: $!"; print "geflockt\n"; sleep 20'

Dann nimm Dir eine zweite Shell, gib noch einmal dasselbe ein. Und siehe da, in der zweiten Shell kommt das "geflockt" nicht, bevor das erste Skript 20 Sekunden lang gewartet hat.

Lieblingsmodule: CPAN:

IPC::System::Simple, CPAN:

Path::Class