$a = ''; $a .= chr 1<<$_ for 0..63;;

print length $a;;
64

$a = reverse $a;;
Malformed UTF-8 character (byte 0xfe) in reverse at (eval 47)

print length $a;;
75