in reply to iso-8859-1 code converter

but actually give me the corresponding code for that character in iso-8859-1.
Here are some ideas
use Encode; my $ord = ord encode("iso-8859-1",decode("EUC", $bytes));
Unicode::UCD, Unicode::Transform

Replies are listed 'Best First'.
Re^2: iso-8859-1 code converter
by ikegami (Patriarch) on May 06, 2009 at 15:38 UTC

    Equivalent:

    use Encode; my $ord = ord decode("EUC", $bytes); $ord = undef if $ord > 255;

    But neither implementation is likely to be useful (to anyone in general or to the OP specifically).