my $t = time;
foreach my $f (@list) {
    if ( $f->{mtime} + 300 < $t ) {
        # retrieve $f->{filename} here
    }
}