$menucount = scalar(grep {($file{$_}{FILETYPE} eq "Menu") 
                           && 
                          ($file{$_}{VOICEOVER} eq "No") 
                         } keys %file);