Lines Matching defs:autouse
1 package autouse;
6 $autouse::VERSION = '1.03';
8 $autouse::DEBUG ||= 0;
18 my $class = @_ ? shift : 'autouse';
33 print "autouse called from $callpkg\n" if $autouse::DEBUG;
47 croak "autouse into different package attempted"
61 if $autouse::DEBUG;
88 autouse - postpone load of modules until a function is used
92 use autouse 'Carp' => qw(carp croak);
99 use autouse 'Module' => qw(func1 func2($;$));
129 Using C<autouse> will move important steps of your program's execution
136 Break the execution of your program if the module you C<autouse>d has
143 the prototype you specified on C<autouse> line is wrong, you will not
146 for such functions C<autouse>ing gives biggest win, for a workaround
155 use autouse Module => qw(carp($) croak(&$));