如何计算一个 hash 里有多少个关键词？

如何计算一个 hash 里有多少个关键词？
$#{$hash{$hash}}是计算有多少个value ,
但是如何计算一个hash里有多少个关键词呢？

keys
values

my    %hhh = qw/a b c d e f g h i j k l m n/; my $how_many_keys = keys %hhh; my $how_many_values = values %hhh;

#!/usr/bin/perl
use strict;
use warnings;
use diagnostics;
my %hhh = qw/a b c d e f g h i j k l m n/;

my $how_many_keys = keys %hhh; my $how_many_values = values %hhh;

print $how_many_keys;
print "\n";
print $how_many_values;
print "\n";

my $k=scalar (keys %hhh); my $v=scalar (values %hhh);

print $k;
print "\n";
print $v;
print "\n";

顺便请问楼主及各位，楼上的code颜色控制是如何实现的？
比较好奇，希望各位指教。

插入的时候，不要选插入代码，选“插入程序代码”
然后选perl

谢谢所有人！
我还以为用perl代码实现的呢。
我想应该也可以用perl代码来实现吧？