【Perl初学者】keys関数

keys関数とは

ハッシュのすべてのキーを取得することができる。取得するキーの順序は不定。
ハッシュのリファレンスを引数として渡す場合は、デリファレンスをする必要あり。

例)

;hello.pl

my $score = keys(%$hash);#複雑なハッシュの場合は%{$hash}とする

ハッシュのキーと値をすべて出力

;hello.pl

my $foods = {'apple' => 'りんご', 'banana' => 'バナナ', 'orange' => 'オレンジ'};
for my $food (sort keys(%$foods)) {
  print "$food:$foods->{$food}\n";
};