Help for this page

Select Code to Download


  1. or download this
    use IO::File;
# ...
my $fh=IO::File->new;
if ($fh->open($file,"<")) { # ...
  2. or download this
    open my $fh, "<", $file or die "Can't open $file $!";