}
close(FILE);
-#
-# first, generate UTF8 --> EUC_CN table
-#
-
$file = "utf8_to_euc_cn.map";
open(FILE, "> $file") || die("cannot open $file");
close(FILE);
#
-# then generate EUC_JP --> UTF8 table
+# then generate EUC_CN --> UTF8 table
#
reset 'array';
}
close(FILE);
-#
-# first, generate UTF8 --> EUC_JP table
-#
-
$file = "utf8_to_euc_jp.map";
open(FILE, "> $file") || die("cannot open $file");
}
close(FILE);
-#
-# first, generate UTF8 --> EUC_KR table
-#
-
$file = "utf8_to_euc_kr.map";
open(FILE, "> $file") || die("cannot open $file");
close(FILE);
#
-# then generate EUC_JP --> UTF8 table
+# then generate EUC_KR --> UTF8 table
#
reset 'array';
}
close(FILE);
-#
-# first, generate UTF8 --> EUC_TW table
-#
-
$file = "utf8_to_euc_tw.map";
open(FILE, "> $file") || die("cannot open $file");
close(FILE);
#
-# then generate EUC_JP --> UTF8 table
+# then generate EUC_TW --> UTF8 table
#
reset 'array';
close(FILE);
-#
-# first, generate UTF8 --> SJIS table
-#
-
$file = "utf8_to_sjis.map";
open(FILE, "> $file") || die("cannot open $file");