おいぬま日報(不定期)

@ [perl] each関数

each関数を使うと、ハッシュのキーと値のリスト(配列)を取得することができる。 たとえばこんな感じで。

my %hash = (hoge => '値1', fuga => '値2');
while (my ($key, $value) = each(%hash)) {
	print "$key=$value\n";
}

実行結果は見せるまでもないけど、一応。

bash-2.03$ perl ~/perl/hash.pl
fuga=値2
hoge=値1

いやー、楽チンですねぇ。