Bienvenida a los foros de Perl en Español, anxorita.
Hay varias formas de hacerlo...
En este foro encontrarás algunos ejemplos:
viewtopic.php?p=6555#6555Otra forma:
Using perl Syntax Highlighting
my %veces;
foreach my $nombre ( @nombres ) {
$veces{$nombre}++;
}
foreach my $nombre ( sort keys %veces ) {
print "$nombre aparece $veces{$nombre}\n";
}Coloreado en 0.002 segundos, usando
GeSHi 1.0.8.4
Usamos un hash para llevar la cuenta de las veces que aparece cada $nombre. Usamos los nombres como claves de ese hash. Luego, hacemos un bucle por todos los nombres encontrados, de forma ordenada (sort keys) y sacamos ese $nombre y las veces que aparece.
En perlfaq4 tienes más pistas.