You are viewing the version of this documentation from Perl blead. This is the main development branch of Perl. (git commit 135abefda8f01c71feb2d24e5415f1d62b2a235a)
lock THING

This function places an advisory lock on a shared variable or referenced object contained in THING until the lock goes out of scope.

The value returned is the scalar itself, if the argument is a scalar, or a reference, if the argument is a hash, array or subroutine.

lock is a "weak keyword"; this means that if you've defined a function by this name (before any calls to it), that function will be called instead. If you are not under use threads::shared this does nothing. See threads::shared.