open(OUT, '>>conversion.txt') or die;
    foreach $line1 (@lines1) {
        if (exists $table{$line1}) {
            print OUT $line1, ' ', $table{$line1}, "\n";
        }
    }
    close OUT;