A little poem that expresses the question I face each weekend, and when run, give a pretty big hint as to the answer.

!/usr/bin/perl
if ($^I =~ m/cool/) {
        go("clubbing")
} else {
        go('hack', 'Perl')
}

sub go {
        print "Guess I'm just another @{[reverse @_]}er.\n";
}
[download]

--
Ryan Koppenhaver, Aspiring Perl Hacker
"I ask for so little. Just fear me, love me, do as I say and I will be your slave."