Perl Cd Bookshelf [Electronic resources] نسخه متنی

31.20. use subs

use subs qw/winken blinken nod/;
@x = winken 3..10;
@x = nod blinken @x

This pragma predeclares as standard subroutines all the names in
the argument list. The advantage here is that you may now use those
functions without parentheses as list operators, just as if you''d
declared them yourself.
This is not necessarily as useful as full declarations, because
it doesn''t allow prototypes or attributes, such as:

sub winken(@);
sub blinken(\@) : locked;
sub nod($) : lvalue;