foreach $file (@find)
{
open (open, "<upload_profile/$file") or die $!};

    while (<open>)
    {   
        ($name, $ID) = (split)...;
         $data{$file} = {$ID => $name};
    }
      close (open);
}

##</code><code>##

open (ORI, "<validate);

while (<ORI>) {

        ($oriName, $oriID) = (split);


for $temp (keys %data) {                    
        for $identify ( keys %{ $data{$temp} } ) {   
              print " Match $identify=$data{$temp}{$identify} " if (exists $data{$temp}{$oriID});