perl -MFile::Type -le 'print File::Type->new->checktype_filename("text.gz")'