Perl - How to open a gzipped file

open (FH, "/usr/bin/gzcat $file_name|") or die " Whatever : $! \n ";