2 subs::auto - Read barewords as subroutine names.
10 foo; # Compile to "foo()" instead of "'foo'"
11 # or croaking on strict subs
12 foo $x; # Compile to "foo($x)" instead of "$x->foo"
13 foo 1; # Compile to "foo(1)" instead of croaking
14 foo 1, 2; # Compile to "foo(1, 2)" instead of croaking
16 foo->meth; # "'foo'->meth" if you have use'd foo somewhere,
17 # or "foo()->meth" otherwise
18 print foo 'wut'; # print to the filehandle foo if it's actually one,
19 # or "print(foo('wut'))" otherwise
20 } # ... but function calls will fail at run-time if you don't
21 # actually define foo somewhere
26 This pragma lexically enables the parsing of any bareword as a
27 subroutine name, except those which corresponds to an entry in %INC
28 (expected to be class names) or whose symbol table entry has an IO slot
29 (expected to be filehandles).
31 You can pass options to "import" as key / value pairs :
35 Specifies on which package the pragma should act. Setting $pkg to
36 "Some::Package" allows you to resolve all functions name of the type
37 "Some::Package::func ..." in the current scope. You can use the
38 pragma several times with different package names to allow
39 resolution of all the corresponding barewords.
41 Defaults to the current package.
43 This module is not a source filter.
49 "*{'::foo'}{CODE}" will appear as defined in a scope where the pragma is
50 enabled, "foo" is used as a bareword, but is never actually defined
51 afterwards. This may or may not be considered as Doing The Right Thing.
52 However, "*{'::foo'}{CODE}" will always return the right value if you
53 fetch it outside the pragma's scope. Actually, you can make it return
54 the right value even in the pragma's scope by reading "*{'::foo'}{CODE}"
55 outside (or by actually defining "foo", which is ultimately why you use
56 this pragma, right ?).
58 You have to open global filehandles outside of the scope of this pragma
59 if you want them not to be treated as function calls. Or just use
60 lexical filehandles and default ones as you should be.
62 This pragma doesn't propagate into "eval STRING".
67 Variable::Magic with "uvar" magic enabled (this should be assured by the
68 required perl version).
72 Carp (standard since perl 5), XSLoader (since 5.006).
75 Vincent Pit, "<perl at profvince.com>", <http://www.profvince.com>.
77 You can contact me by mail or on "irc.perl.org" (vincent).
80 Please report any bugs or feature requests to "bug-subs-auto at
81 rt.cpan.org", or through the web interface at
82 <http://rt.cpan.org/NoAuth/ReportBug.html?Queue=subs-auto>. I will be
83 notified, and then you'll automatically be notified of progress on your
84 bug as I make changes.
87 You can find documentation for this module with the perldoc command.
91 Tests code coverage report is available at
92 <http://www.profvince.com/perl/cover/subs-auto>.
95 Thanks to Sebastien Aperghis-Tramoni for helping to name this pragma.
98 Copyright 2008,2009,2010,2011 Vincent Pit, all rights reserved.
100 This program is free software; you can redistribute it and/or modify it
101 under the same terms as Perl itself.