You could do something like this, but this is still looping:

foreach my $clipnum (keys %file) {
      $menucount++ if ($file{$clipnum}{FILETYPE} eq "Menu");
      $menunvocount++ if ($file{$clipnum}{FILETYPE} eq "Menu" && $file
+{$clipnum}{VOICEOVER} eq "No");
      $videocount++ if ($file{$clipnum}{FILETYPE} eq "Video");
      $nvocount++ if ($file{$clipnum}{VOICEOVER} eq "No" && $file{$cli
+pnum}{FILETYPE} eq "Video");
      $vocount = $videocount - $nvocount;
      $menuvocount = $menucount - $menunvocount;
}
[download]

I know this isn't exactly what you asked, but I believe looping is the only way.

J. J. Horner
Linux, Perl, Apache, Stronghold, Unix
jhorner@knoxlug.org http://www.knoxlug.org/