zahlen aus einem array auslesen

[Siechfred]

ich habe ein Mehrdimensionales array und in diesem Array wiederrum 6 zahlen (würfel) ich möchte jetzt innerhalb diesen Arrays die zahlen vergleichen und wissen wieviele davon gleich sind.

Ich weiß jetzt nicht, ob ich Dein Anliegen richtig verstehe, aber Autovivikation könnte ein Ansatz sein:

my @dices = ( [ 'on', 1 ],  
              [ 'off', 6 ],  
              [ 'on', 2 ],  
              [ 'on', 2 ],  
              [ 'on', 5 ]  
            );  
my %values;  
for(0..@#dices) {  
  $values{$dices[$_][1]}++ if($dices[$_][0] eq 'on');  
}  
  
for(1..6) {  
  if( exists $values{$_} )  
    print $_, ' encountered ', $values{$_}, ' time(s).';  
  }  
  else {  
    print $_, ' not encountered.';  
  }  
}

Siechfred