Help for this page

Select Code to Download


  1. or download this
    ($\, $,) = ("\n", " "); # set up output mode
    $string = "A" . chr(180) . "B";  # Latin-1
    print unpack "C*", $string;
    $string .= chr(367); # UTF-8
    print unpack "C*", $string;
    
  2. or download this
    ($\, $,) = ("\n", " "); # set up output mode
    $string = "A" . chr(180) . "B";  # Latin-1
    print unpack "C*", $string;
    $string .= pack "U0"; # zero length, UTF-8
    print unpack "C*", $string;