Easier still? Use 'C*' with pack.
perl58 -e" print pack 'C*', qw[84 67 49 67 83 50 79] ";
TC1CS2O
Not that it matters, but its a sight quicker than map{ chr } @chars; :)
Examine what is said, not who speaks.
"Efficiency is intelligent laziness." -David Dunham
"When I'm working on a problem, I never think about beauty. I think only how to solve the problem. But when I have finished, if the solution is not beautiful, I know it is wrong." -Richard Buckminster Fuller