Help for this page
use strict; use warnings; use utf8 ; ... warn "\n*** _utf8_on"; Encode::_utf8_on($decoded); Dump $decoded;
*** orig str='Ä' at c:/tmp/b64_utf8.pl line 12. SV = PV(0x54c9d8) at 0x5a8b00 ... PV = 0x28d2c28 "\303\204"\0 [UTF8 "\x{c4}"] CUR = 2 LEN = 16