Help for this page

Select Code to Download


  1. or download this
    BEGIN {
        *CORE::GLOBAL::open = \&my_open;
    ...
    }
    
    open my $fh, "<", "temp~" or die $!;