Help for this page

Select Code to Download


  1. or download this
    if (-e $file && open (my $AFILE, "<$file")) { ...
  2. or download this
    if (-e $file && open (AFILE, "<$file")) { ...
  3. or download this
    sub open
{
...
    $return = CORE::open($filehandle,@_[0..$#_]);
    return $return;
}