in reply to Upper-casing characters above Hex FF.

What version of perl are you using? 5.8.0 and beyond should be able to automatically detect unicode and do the right thing.

----
I wanted to explore how Perl's closures can be manipulated, and ended up creating an object system by accident.
-- Schemer

: () { :|:& };:

Note: All code is untested, unless otherwise stated