Help for this page

Select Code to Download


  1. or download this
    $ perl -e'print pack "C*", 0..255;' | od -t x1
    0000000 00 01 02 03 04 05 06 07 08 09 0a 0b 0c 0d 0e 0f
    ...
    0000340 e0 e1 e2 e3 e4 e5 e6 e7 e8 e9 ea eb ec ed ee ef
    0000360 f0 f1 f2 f3 f4 f5 f6 f7 f8 f9 fa fb fc fd fe ff
    0000400
    
  2. or download this
    $ perl -MEncode=encode -E'
       $_ = pack "C*", 0..255;
       say $_ eq encode("iso-latin-1", $_) ? "same" : "diff";
    '
    same