lib/scripts/recode.pl
author wenzelm
Mon, 16 Sep 2013 12:37:54 +0200
changeset 53657 64942a1f7187
parent 52835 0906c00bb21d
child 62506 860cd901ab43
permissions -rw-r--r--
prefer high-level ML_System.share_common_data, ML_System.save_state -- except for bootstrap images (RAW, Pure);

#
# Author: Makarius
#
# recode.pl - recode utf8 for ML
#

for (@ARGV) {
  utf8::upgrade($_);
  s/([\x80-\xff])/\\${\(ord($1))}/g;
  print $_, " ";
}