Help for this page

Select Code to Download


  1. or download this
    % perl -wle 'print ord do { use bytes; chr(1000) }'
232
...
232
% perl -wle 'print ord do { no  bytes; chr(1000) }'
1000