Or you just simply use:
die "Can't open $inputFilename for reading, exiting ..." unless open(READGZIPPEDFILE, "zcat $inputFilename|" );
I think it's very efficient like this, taking input zcat pipe.