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


in reply to A *real* geek...
in thread You know you're a geek when...

Or better yet....obfu'd it.

perl -e 'print reverse qw/o b n a e s/;'

In Section Cool Uses for Perl