Help for this page

Select Code to Download

Select or download this

#!/usr/bin/env perl
use strict;
...
Dump($a);
$a = decode('utf8',$a);
Dump($a);

Select or download this

> ./utf8-1.pl
SV = PV(0x92a10a0) at 0x929ee10
...
  PV = 0x92f76c8 "AAA"\0 [UTF8 "AAA"]
  CUR = 3
  LEN = 4