my $ft = File::Type->new(); my $file_type = $ft->checktype_filename($file);