...

if (!close($fh)) {
   $!          and die("Can't close gunzip: $!\n");
   ($? & 0x7F) and die("gunzip died from signal ", ($? & 0x7F), "\n");
   ($? >> 8)   and die("gunzip exited with error ", ($? >> 8), "\n");
}

##</code><code>##

gzip: notexists.gz: No such file or directory
gunzip exited with error 1