You are viewing the version of this documentation from Perl blead. This is the main development branch of Perl. (git commit f7c24445e812fb0ebf1aee4d27ab5d3b18996b6f)
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.