in reply to Anonymous sub clarification
Please see Comma Operator in perlop.
Give a man a fish: <%-{-{-{-<