haowu_ord.pl

given a unicode char find the index

use charnames qw(:full);
printf("%x", (ord("武")));