sub xs_edistance { my $a1 = $utf32encoder->encode($_[0],0); my $a2 = $utf32encoder->encode($_[1],0); }