Help for this page

Select Code to Download


  1. or download this
        if ($^O eq "MSWin32") {
        $fh = $_[0];
    }
  2. or download this
        $fh = Compress::Zlib::gzdopen_ ($fh, $mode, 0)
  3. or download this
        if ($^O eq "MSWin32") {
        $fh = fileno($_[0]);
    }
  4. or download this
    --- Tar.pm  Fri Apr 28 00:50:16 2000
+++ blib/lib/Archive/Tar.pm Sat Aug 24 15:06:04 2002
...
     }
     else {
    $flags = fcntl ($_[0], F_GETFL, 0) & (O_RDONLY | O_WRONLY | O_RDWR
+);