$filesRef = someSubOrMethodThatReturnsAnAoHReference();

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