for $clipnum(0 .. $noofclips-1)
{     
	if ($file{$clipnum}{FILETYPE} eq "Menu")
	{  
		$menucount++;
		
		if ($file{$clipnum}{VOICEOVER} eq "No")
		{ $menunvocount++; }
		else
		{ $menuvocount++; }
	}  
      
	if ($file{$clipnum}{FILETYPE} eq "Video")
	{			
		$videocount++;				
      
		if ($file{$clipnum}{VOICEOVER} eq "No")
		{ $nvocount++;	} 			
		else
		{ $vocount++; } 			
	}  
}

##</code><code>##

$menucount = (all keys in hash that equal) ($file{$clipnum}{FILETYPE} eq "Menu" && ($file{$clipnum}{VOICEOVER} eq "No")