--- Jeff Pinyan <[EMAIL PROTECTED]> wrote:
> >> . . . Orcish maneuver, to increase speed.
> >> { my %cache;
> >> @new = sort {
> >> ($cache{$a}) = $a =~ /\@([^:]+)/ if not exists $cache{$a};
> >> ($cache{$b}) = $b =~ /\@([^:]+)/ if not exists $cache{$b};
> >> $cache{$a} cmp $cache{$b}
> >> } } @orig;
> >A name always helps me remember things like that. Thanks.
> Joseph Hall (author of "Effective Perl Programming") coined the term
> "Orcish maneuver", because in essence, it's supposed to look like:
> $cache{$a} ||= function($a);
> $cache{$b} ||= function($b);
> So it's "OR" + "cache" = "Orcish" -- pronounced the same way a reader
> of Tolkien literature would say it.
Way cool.
And one more *very* OT thing....
did anyone besides me get a chuckle out of the smiley [^:] peeking out
of the match pattern?
We take our smiles where we find them. ;o>
__________________________________________________
Do You Yahoo!?
Yahoo! Auctions - buy the things you want at great prices
http://auctions.yahoo.com/
