foreach $from (keys %{ $Lang{$L}{"Repl"} }) {
      $to=$Lang{$L}{"Repl"}{$from};

      utf8::upgrade($from);  # Use Unicode semantics for \b
      s/\b$from\b/$to/i;
    }