Select Code to Download

$ perl -Mv5.14 -e'say length "a\xA0" =~ s/\s+\z//r'
1

$ perl -Mv5.14 -e'say length unpack "A*", "a\xA0"'
2

$ perl -Mv5.14 -e'say length "a\x00" =~ s/\s+\z//r'
2

$ perl -Mv5.14 -e'say length unpack "A*", "a\x00"'
1