http://www.perlmonks.org?node_id=72489

Since I'm a newbie, I can't contribute too much over at "Seekers of Perl Wisdom". Instead, I've given some money and bought a t-shirt. Still, I yearn to find a way to more directly contribute to the PerlMonk community---the most entertaining thing I've ever found on the internet. So I offer this suggestion:

How about if we start a "Brain Teaser" section to PerlMonks? You could have "Newbie", "Intermediate" and "Perl Monk Master" sections. People could measure their skill level by seeing which brain teasers they are able to answer. It's also a great way for everyone to contribute through the offering of brain teasers. So here's my first brain teaser, at the "Newbie" level, of course.

Problem:
What do you think the output of the following code is? Can you explain why? If you are stumped, click "Reply" to see the answer.

#!/usr/bin/perl -w use strict; my $aloha = "hello"; print reverse($aloha);

2001-04-14 Edit by Corion : Fixed some typos per request