Cari di Perl 
    Perl User Manual
Daftar Isi
(Sebelumnya) Replace functions with ones th ...Establish an ISA relationship ... (Berikutnya)
Pragmas

Postpone load of modules until a function is used

Daftar Isi

NAME

autouse - postpone load of modules until a function is used

SYNOPSIS

  1. use autouse 'Carp' => qw(carp croak);
  2. carp "this carp was predeclared and autoused ";

DESCRIPTION

If the module Module is already loaded, then the declaration

  1. use autouse 'Module' => qw(func1 func2($;$));

is equivalent to

  1. use Module qw(func1 func2);

if Module defines func2() with prototype ($;$), and func1() hasno prototypes. (At least if Module uses Exporter's import,otherwise it is a fatal error.)

If the module Module is not loaded yet, then the above declarationdeclares functions func1() and func2() in the current package. Whenthese functions are called, they load the package Module if needed,and substitute themselves with the correct definitions.

WARNING

Using autouse will move important steps of your program's executionfrom compile time to runtime. This can

  • Break the execution of your program if the module you autoused hassome initialization which it expects to be done early.

  • hide bugs in your code since important checks (like correctness ofprototypes) is moved from compile time to runtime. In particular, ifthe prototype you specified on autouse line is wrong, you will notfind it out until the corresponding function is executed. This will bevery unfortunate for functions which are not always called (note thatfor such functions autouseing gives biggest win, for a workaroundsee below).

To alleviate the second problem (partially) it is advised to writeyour scripts like this:

  1. use Module;
  2. use autouse Module => qw(carp($) croak(&$));
  3. carp "this carp was predeclared and autoused ";

The first line ensures that the errors in your argument specificationare found early. When you ship your application you should commentout the first line, since it makes the second one useless.

AUTHOR

Ilya Zakharevich ([email protected])

SEE ALSO

perl(1).

 
Source : perldoc.perl.org - Official documentation for the Perl programming language
Site maintained by Jon Allen (JJ)     See the project page for more details
Documentation maintained by the Perl 5 Porters
(Sebelumnya) Replace functions with ones th ...Establish an ISA relationship ... (Berikutnya)