Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight
 
PerlMonks  

Re^2: What does utf8::upgrade actually do.

by syphilis (Archbishop)
on Feb 17, 2021 at 12:34 UTC ( [id://11128492] : note . print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    use Math::GMPz qw(:mpz);
    my $z = Math::GMPz->new();
    ...
    $str = chr(ord $v);
    Rmpz_import($z, 1, 1, 1, 0, 0, $str);
    print $z; # prints the value assigned to $v (ie 255).
    
  2. or download this
    use Math::GMPz qw(:mpz);
    my $z = Math::GMPz->new();
    ...
    utf8::upgrade($str);
    Rmpz_import($z, 1, 1, 1, 0, 0, $str);
    print $z; # now prints 195.