Dear Edward, Dear Mr. Lemberg!
Thank you very much for your solutions. I'll try this out. And sorry for this stupid question. As "simple user" I was just unfamilliar with all this encoding stuff.

best wishes
Markus

Am 03.04.2006 um 16:38 schrieb Edward G.J. Lee:

On Mon, Apr 03, 2006, Werner LEMBERG wrote:

while (<>) {
  s/([\xA1-\xFE])([\x40-\x7E]|[\xA1-\xFE])/
    if ($2 eq "\\" || $2 eq "{" || $2 eq "}") {
      sprintf("\\CJKchar{%d}{%d}", ord($1), ord($2));
    }
    else {
      sprintf("$1$2");
    }
   /eg;
  print;
}

  Oopes, I send my email too fast.:)



        Edward


_______________________________________________
Cjk maillist  -  [email protected]
http://lists.ffii.org/mailman/listinfo/cjk

Reply via email to