SPUG: Perl Question?

jerry gay jerry.gay at gmail.com
Tue Dec 13 09:49:21 PST 2005

On 12/13/05, jerry gay <jerry.gay at gmail.com> wrote:
> i have now had the pleasure of experiencing this scenario. not giving
> up on my favorite hack (above,) and finding a reference in my notes to
> it's source, i found and modified a similar locking example that works
> on platforms which don't allow exclusive locks on read-only files.
> INIT {
>     open ME => '+<', $0 or die "can't lock";
>     flock ME => LOCK_EX | LOCK_NB  or exit 1;
> }
of course, i forgot to provide the source... http://perl.plover.com/yak/flock/

More information about the spug-list mailing list