Help for this page

Select Code to Download


  1. or download this
        "unless( $ENV{+ __FILE__ } eq __FILE__ ){"
  2. or download this
    BEGIN {
    unless( $ENV{ +__FILE__ } eq __FILE__ ){
...
        exec $^X, __FILE__, @ARGV; 
   }
}
  3. or download this
    BEGIN {
    if (exists $ENV{LIBPATH}) {
...
        exec $^X, __FILE__, @ARGV;
    }
}
  4. or download this
        "unless( $ENV{+ __FILE__ } eq __FILE__ ){"