while (<WHEREEVERTHECOMPRESSEDDATAIS>) {
    # $_ could be potentially huge, if it doesn't 
    # contain a newline somewhere soon
    print GZIP_IN;
}