use Encode;
my $ord = ord encode("iso-8859-1",decode("EUC", $bytes));