Wie kann ich die Anzahl der Schlüssel in einem Hash in Perl finden?

Question

Wie finde ich die Anzahl der Schlüssel in einem Hash, wie die Verwendung von $# für Arrays?

Answer 1

scalar keys %hash 

oder nur

keys %hash 

, wenn Sie bereits in einem skalaren Kontext sind, z.B. my $hash_count = keys %hash   oder   print 'bighash' if keys %hash > 1000.

Übrigens findet $#array nicht die Anzahl der Elemente, es findet den letzten Index. scalar @array findet die Anzahl der Elemente.

Answer 2

wir wie dieses zu

my $keys = keys(%r) ; 
print "keys = $keys" ; 

0+(keys %r) 

Answer 3

der folgenden weniger zurückkehren können, dass die Anzahl der Schlüssel in der Hash. Sie können es mögen, wenn Sie gern die $#array -Stil, Dinge zu tun (oder Prägnanz) sind:

$#{$hash}; 

KRITISCH EDIT:

Halten Sie auf ... das ist interessant. Es funktioniert, wenn Sie es als eine Array-Referenz verwenden möchten, aber nicht, wenn Sie es außerhalb verwenden. So nützlich es ist, wenn Sie die letzte Taste Ihrer Hash zugreifen möchten, vorausgesetzt, dass Sie Ihre Schlüssel als ein Array in ein temporäres zugewiesen haben: Check this out:

%hash = ("barney" => "dinosaur", "elmo" => "monster"); 
@array = sort {$a cmp $b} keys %hash; 
print $array[$#{$hash}]; 
# prints "elmo" 

Answer 4

Aber nicht nach Perl 5.10:

use feature ":5.10"; 
my %p =(); 
say $#%p; 

# $# is no longer supported 

und schlimmer:

use feature ":5.10"; 
my %p = (a=>1, b=>2, c=>3); 
say $#{%p}; 

# -1 

Answer 5

Dies wird in der einfachen Weise arbeiten und für jede Größe eines Hash.

skalare Schlüssel drucken% hash;

Answer 6

skalare Schlüssel drucken% hash;

OR 

$ X = Schlüssel% hash; drucken $ X;

(Keys% hash den Wert des Schlüssels in der Liste Zusammenhang, dass weitere Änderungen in den Skalarkontext zurückkehren (wenn auf skalaren Variablen zugewiesen wird) .)