use Unicode::Map();
use Unicode::String qw(utf8 utf16);
use Config::INI::Simple;
our $conf = new Config::INI::Simple;
# Read the config file.
$conf->read ("/usr/lib/perl5/tengsl/tengsl_en.ini");
my $CHARSET = $conf->{ANNAD}->{CHARSET};
my $Map = new Unicode::Map($CHARSET);