Dear Dr Keihany,
I'm afraid I didn't quite understand if you want your output in actual
Unicode (UTF-16?)
or as Ascii text with html-style numeric entities ("&#xxxx;" format). In
the latter case,
a simple Perl script might do the job. For instance:
use utf8;
open INFILE, "<test.txt";
open OUTFILE, ">test2.txt";
while ($OneLine = <INFILE>) {
$NewLine = "";
$OneLine =~ s/(.)/
$OneChar = ord($1);
if ($OneChar >= 128) {
$NewLine .= "&#$OneChar;";
}
else {
$NewLine .= $1;
};
$1;
/eg;
print OUTFILE "$NewLine\n";
};
I just jotted this down without much testing, but I think it works in
principle.
Hope this helps,
Lukas Pietsch
This archive was generated by hypermail 2.1.2 : Fri Jul 06 2001 - 00:18:17 EDT