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