DB<7> n
Argument "mir" isn't numeric in subtraction (-) at 1038612.pl line 21, <FILE> line 4.
 at 1038612.pl line 21
Argument "mir" isn't numeric in subtraction (-) at 1038612.pl line 21, <FILE> line 4.
 at 1038612.pl line 21
main::(1038612.pl:23):			$hash{$lines[$j]}=1;