Help for this page

Select Code to Download


  1. or download this
    sub somesub {
      no warnings 'redefine';
    ...
      # several more
      # ....
    }
    
  2. or download this
    sub abc { 1 }
    
    ...
    local *abc = sub { 6 } if 1;
    # Prints 6
    print abc(), "\n";
    
  3. or download this
    package Anypackage;
    sub can_read {
      # Some checks here
    }
    
  4. or download this
    sub can_read { 1 }