00:07 <mdxi> you know why i love perl? because i can say things like: "if (defined $today{$cgi->param('vote')})" and "foreach (@{$order{$cat[$m]}})"
00:09 <TMR> If I could pronounce it, I could say that too.
00:11 <mdxi> the first one is pronounced "if the hash 'today' has an extant key with the name of the return value of the method call param('vote') on the object $cgi"
00:14 <mdxi> the second one is trickier
00:17 <mdxi> it's pronounced "take the array reference which is the value attached to the key in the hash %order whose name matches the value of the $mth member of the array $cat, treat it (the arrayref) as an array instead of the scalar that it actually is, and feed the contents of its referrent array, one by one, into the special variable named $_"
If you ever want to realize just how consise Perl is, just port it to English.
