my %hash = map { $_ => 1 } @files;
    @files = keys %hash;