Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot


by root (Monk)
on Dec 23, 1999 at 00:49 UTC ( #1132=perlfunc: print w/replies, xml ) Need Help??


See the current Perl documentation for lib:attrs.

Here is our local, out-dated (pre-5.6) version:

attrs - set/get attributes of a subroutine

    sub foo {
        use attrs qw(locked method);

    @a = attrs::get(\&foo);

This module lets you set and get attributes for subroutines. Setting attributes takes place at compile time; trying to set invalid attribute names causes a compile-time error. Calling attr::get on a subroutine reference or name returns its list of attribute names. Notice that attr::get is not exported. Valid attributes are as follows.


Indicates that the invoking subroutine is a method.


Setting this attribute is only meaningful when the subroutine or method is to be called by multiple threads. When set on a method subroutine (i.e. one marked with the method attribute above), perl ensures that any invocation of it implicitly locks its first argument before execution. When set on a non-method subroutine, perl ensures that a lock is taken on the subroutine itself before execution. The semantics of the lock are exactly those of one explicitly taken with the lock operator immediately after the subroutine is entered.

Log In?

What's my password?
Create A New User
Domain Nodelet?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (2)
As of 2021-09-22 02:35 GMT
Find Nodes?
    Voting Booth?

    No recent polls found