Splitten von gezippten Protokolldateien, ohne die entzippten Splits auf der Festplatte zu speichern

Ein Skript wie das folgende könnte ausreichen.

#!/usr/bin/perl
use PerlIO::gzip;

$filename = 'out';
$limit = 500000;

$fileno = 1;
$line = 0;

while (<>) {
    if (!$fh || $line >= $limit) { 
        open $fh, '>:gzip', "$filename_$fileno"; 
        $fileno++;
        $line = 0; 
    }
    print $fh $_; $line++;
}

Sie können den split --filter verwenden Option wie im Handbuch erklärt, z. B.

zcat biglogfile.gz | split -l500000 --filter='gzip > $FILE.gz'

Bearbeiten:nicht bekannt, wenn --filter Option wurde eingeführt, aber laut Kommentaren funktioniert sie nicht in core utils 8.4 .