view TOOLS/subfont-c/encodings/charmap2enc @ 14585:81059277538c

Be less verbose with -v (do not print a line for each demuxed packet)
author rtognimp
date Mon, 24 Jan 2005 21:52:24 +0000
parents 842c29861e25
children
line wrap: on
line source

#!/usr/bin/awk -f
# only for mostly 2-byte encodings like euc-kr

$2~"^/x..$" {
	c = substr($2, 3, 2)
	if (c<"80")
	    print substr($1, 3, 4) "\t" c
}
$2~"^/x../x..$" {
	print substr($1, 3, 4) "\t" substr($2, 3, 2) substr($2, 7, 2)
}