$VAR1 = [
          {
            'longname' => 'drwxr-xr-x    2 1ae2ets  fq     4096 Sep 14  2007 .',
...

##</code><code>##

foreach $AoFiles (@files) {
    foreach $file ( @{ $AoFiles } ) {
        foreach $t ( keys %$file ){
            print "\nt= $t v=" . $file->{$t};
        }
    }
    ...


##</code><code>##

@files = someSubOrMethodThatReturnsAnAoHReference();
...

##</code><code>##

$filesRef = someSubOrMethodThatReturnsAnAoHReference();

foreach $file ( @$filesRef ) {
    print Dumper $file;
    foreach $t(keys %$file){
        print "\nt= $t v=" . $file->{$t};
    }
...