Итерация по массиву хэшей в хэше в Perl

У меня есть массив хэшей в хэше, который выглядит так:

$VAR1 = {
          'file' => [
                      {
                        'pathname' => './out.log',
                        'size' => '51',
                        'name' => 'out.log',
                        'time' => '1345799296'
                      },
                      {
                        'pathname' => './test.pl',
                        'size' => '2431',
                        'name' => 'test.pl',
                        'time' => '1346080709'
                      },
                      {
                        'pathname' => './foo/bat.txt',
                        'size' => '24',
                        'name' => 'bat.txt',
                        'time' => '1345708287'
                      },
                      {
                        'pathname' => './foo/out.log',
                        'size' => '75',
                        'name' => 'out.log',
                        'time' => '1346063384'
                      }
                    ]
        };

Как я могу перебрать эти "записи файла"? в цикле и доступ к его значениям? Проще ли скопироватьmy @array = @{ $filelist{file} }; так у меня есть только массив хэшей?

Ответы на вопрос(2)

Ваш ответ на вопрос