in reply to tr/<mixed string>/<UPPER STRING>/

you don't have to use tr for this - just use the built in uc function:
$_ = uc;
or, if you're using the var in a string, you can use the \U:
$_ = "\U$_";

-- Dan