Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl

...
say "Executing ".__PACKAGE__;
INIT { say __PACKAGE__."::INIT"; };
END { say __PACKAGE__."::END"; };
  2. or download this
    package Xyzzy;

...
INIT { say __PACKAGE__."::INIT"; $external->(); };
END { say __PACKAGE__."::END"; };
     1;
  3. or download this
    Executing Xyzzy
Xyzzy::INIT
...
Executing main
main::END
Xyzzy::END