2Re: bitwise string operator question

[jeffa]

Thanks Abigail-II, i just learned something cool for the day:

perl -le'sub uc{@_[0]^" "};print uc($_)for(a..z)'

Can't believe i hadn't picked that up before now ...

DOH! Heh, my original one-liner did the bitwise XOR in a map ... i should know better than that. :P Let's try that again:

perl -le'sub flip{@_[0]^" "};print flip($_)for(a..z)'

There, no ambiguity now. But ... the saddest part is that i learned this trick too late. My C++ Lab students last semester had to write a function that would flip case ... i really wish i could have blown their minds with this one. ;)

jeffa

L-LL-L--L-LL-L--L-LL-L--
-R--R-RR-R--R-RR-R--R-RR
B--B--B--B--B--B--B--B--
H---H---H---H---H---H---
(the triplet paradiddle with high-hat)

[Abigail-II]

That calls the buildin uc. You might want to call ::uc instead. But beaware, it doesn't uppercase! It flips the case, uppercase to lowercase, and lowercase to uppercase.

Abigail

[Koschei]

Also be aware that, if you're using locales and such, uc() is aware how to transform accented characters and will DTRT.