今日覚えた（思い出した？）Perl

無名配列と無名連想配列。
無名配列は[]で作成、無名連想配列は{}で作成。リファレンスを使ってアクセスする。

$a = ['hoge', 'fuga'];
$b = {'hoge' => 1, 'fuga' => 2};

foreach(@{$a}) {
	print $_ . "\n";
}
foreach(keys(%{$b})) {
	print $_ . "=>" . $b->{$_} . "\n";
}

出力

hoge
fuga
fuga=>2
hoge=>1

#　あと、Perlには”echo”という命令はないらしい、ということも覚えた。

以上