Help for this page
> /appl/cpc/devel/bin/perl -v ... > /appl/cpc/devel/bin/perl -e '$a = pack("C*", 0x7f..0x81); for ( $i = + 0; $i < length($a); ++$i ) { print ord(substr($a, $i, 1)) . " " }; p +rint "\n"' 127 128 129