use Data::Dump qw[ pp ];;
pp $a;;
[Malformed UTF-8 character (fatal) at C:/Perl64/lib/Data/Dump.pm line 458, <STDIN> line 20.