- or download this
use strict;
use warnings;
...
$data{string} = $string;
print "$data{string}\n";
- or download this
SV = PV(0x9766470) at 0x964eae8
REFCNT = 1
...
CUR = 34
LEN = 36
a string with a wide character: Ā
- or download this
use strict;
use warnings;
...
$data{string} = $string;
print "$data{string}\n";