Help for this page

Select Code to Download


  1. or download this
    open (REPORT,">$filename") || die "error";
...
...
[end outer loop]

close (REPORT) || die ...
  2. or download this
    $oldHandle = select (REPORT);
$~ = [format reference]
select $oldHandle;
  3. or download this
    write() on closed filehandle REPORT at script line xxx
[repeated several times]
Cannot close <filename> (Bad file descriptor)