Help for this page

Select Code to Download


  1. or download this
    pack "C*", unpack "U*", $_
    
  2. or download this
    #!perl -w
    use strict;
    ...
    my $b = simplemap(\%unicode2win1252, $a);
    my $c = unpack("H*", $b); 
    print "a = $a\nb = $b\nc = $c\n";