in reply to Re^2: Faster grep in a huge file(10 million)
in thread Faster grep in a huge file(10 million)

print $line if defined $file2{$line};
I think that finds lines in file 1 that are also in file 2. To find lines in file 1 not in file 2, maybe change that to:

print $line unless defined $file2{$line};