Help for this page

Select Code to Download

Select or download this

  my $file = "/usr/local/apache/logs/access.log.1.gz";
  open(PIPE, "gunzip -dc $file |") or die "gunzip $file: $!";
  while ( <PIPE> ) {
...
      # massive whatever
  }
  close(PIPE);