$txline = $_;
$ch1 = "\N{U+100049}";
$ch2 = "\N{u+2190}";
$txline =~ s/$ch1/$ch2/g;