Use a do block to limit the scope:
$s = "\x{100}";;
print do{ use bytes; length $s } . ' : ' . length $s;;
2 : 1
Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
Lingua non convalesco, consenesco et abolesco. -- Rule 1 has a caveat! -- Who broke the cabal?
"Science is about questioning the status quo. Questioning authority".
In the absence of evidence, opinion is indistinguishable from prejudice.