@array = (
　　　　{ 'aaa' => 1 },
　　　　{ 'bbb' => 2 },
　　　　{ 'ccc' => 3 }
);

上記の様な無名ハッシュの配列から値を取り出すには、$array[0]{aaa} などで取り出せますが、
each関数を使用してキーと値を取り出す場合、引数にはどのように指定すれば良いのでしょうか？
($key, $val) = each(%$array[0]) という風に指定してもエラーが出てしまいます。