Re: Problems with perl script on 6.1/5.8.8

["Josh Carroll" <josh_(_dot_)_carroll_(_at_)_gmail_(_dot_)_com>]

> Can't modify single ref constructor in lock at ./caldisp.pl line 84, near
> "*LOCKF)"
> Execution of ./caldisp.pl aborted due to compilation errors.

I'm not sure what has changed in Perl 5.8, but this should work instead:

if(open my $fh, "> $LOCKF") {
  lock($fh);
}

Josh
_______________________________________________
freebsd-questions_(_at_)_freebsd_(_dot_)_org mailing list
http://lists.freebsd.org/mailman/listinfo/freebsd-questions
To unsubscribe, send any mail to "freebsd-questions-unsubscribe_(_at_)_freebsd_(_dot_)_org"