Làm thế nào tôi có thể tìm thấy số lượng khóa trong một băm trong Perl?

Question

Làm cách nào để tìm số lượng khóa trong băm, như sử dụng $# cho mảng?

Answer 1

scalar keys %hash 

hoặc chỉ

keys %hash 

nếu bạn đã có trong một bối cảnh vô hướng, ví dụ my $hash_count = keys %hash   hoặc   print 'bighash' if keys %hash > 1000.

Ngẫu nhiên, $#array không tìm thấy số lượng phần tử, nó tìm thấy chỉ mục cuối cùng. scalar @array tìm số lượng phần tử.

Answer 2

chúng ta có thể sử dụng như thế này quá

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

0+(keys %r) 

Answer 3

Sau đây sẽ trả lại một ít mà số lượng các phím trong băm của bạn. Bạn có thể thích nó nếu bạn thích các $#array kiểu làm việc (hoặc conciseness):

$#{$hash}; 

QUAN TRỌNG EDIT:

Giữ trên ... Đây là thú vị. Nó hoạt động nếu bạn muốn sử dụng nó như là một tham chiếu mảng, nhưng không phải nếu bạn sử dụng nó bên ngoài. Vì vậy, nó rất hữu ích nếu bạn muốn truy cập chìa khóa cuối cùng của băm của bạn, miễn là bạn đã gán phím của bạn như là một mảng để một temp: Check this out:

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

Answer 4

Nhưng không phải sau khi Perl 5.10:

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

# $# is no longer supported 

và tồi tệ hơn:

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

# -1 

Answer 5

này sẽ làm việc theo cách dễ dàng và đối với bất kỳ kích thước của một băm.

in các khóa vô hướng% băm;

Answer 6

in các khóa vô hướng% băm;

OR 

$ X = khóa% băm; in $ X;

(Keys% băm trả về giá trị của phím trong bối cảnh danh sách những thay đổi sâu hơn vào bối cảnh vô hướng (khi gán cho biến vô hướng) .)