Um, you are supposed to actually assign $temp to $c at the end...

I am a big fan of Perl constructs that result in my making fewer mistakes. Particularly silly thinkos like the above (which I am likewise prone to). :-)