see perlman:perlop and look for the section on Conditional Operator. It's basically an in-place if-then type of construct that evaluates the EXPR $uclc eq 'lc' and returns lc() if the EXPR is true or uc() if the EXPR is false.
Comment on (ichimunki) re x 4: More efficient munging if infile very large (explain particular syntax?)