Select Code to Download

 
sdiff
diff
gvimdiff 
etc but no success

File 1:-
Harry 21
...
5789 78 66 32 DD Young Gilli (D) (10%) 39 + -1 Don (D) (66%) 98 + -1 M
+ett (D) (23%) 15 + +1
9027 56 77 29 GG Old Harry (D) (10%) 54 + -1 Rose (D) (%) 46 + -1 Ness
+ (D) (67%) 65 + 1

I have to get my results like this:-
If suppose Harry, Rob and Met are present 
...

9027 56 77 29 GG Old Harry (D) (10%) 54 + -1     1
Since only  1 is matching with File 1

#!/usr/bin/perl -w

...
           print "$name\t\t$href{$name}\n";
           #@_=split('\t',$_);
   }