if ($lines{$_] eq $lines2[$_]) {