Welcome skalman,

Maybe a hash is what you want. Build the hash so that the names from 'array 2' are the keys and the key value is the counter, i.e. (untested):

my %hash = ();
for my $no ( 0..$#array2 )
{
      if ( $array2[$no] ) { $hash{ $array2[$no] }++; }
}
[download]

To print, just do the following:

foreach my $key ( sort keys %hash )
{    print "$key:$hash{$key}\n"; }
[download]

In general, Perl hashs are perfect for this type of requirement.

UPDATE:Fixed as 'perl' Laurent_R :-)

Regards...Ed