You haven't shown us your 'use' statements, I suspect you didn't import the LOCK_ constants,
perldoc -f flock
Adding:
use Fcntl ':flock'; # import LOCK_* constants
Should help.
I think you need to do:
use Fcntl qw(:DEFAULT :flock);
or else Perl will complain about O_RDWR and/or O_CREAT instead. The latter are imported by default when using Fcntl, but need to be explicitly imported if you explicitly import anything else.
perldoc Exporter
-- Gunnar Hjalmarsson Email: http://www.gunnar.cc/cgi-bin/contact.pl
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
