Re: fun with hashes!

"Mr. Shawn H. Corey" <[email protected]> Fri, 23 Nov 2007 22:13:14 -0500
Newsgroups gmane.comp.lang.perl.fun
Message-ID <[email protected]>
Vladi Belperchinov-Shabanski wrote:
> On Fri, 23 Nov 2007 23:18:20 +0100
> "A. Pagaltzis" <[email protected]> wrote:
> 
>> * Jerrad Pierce <[email protected]> [2007-11-23 22:50]:
>>> exists( $dispatch{$sub} ) ? $dispatch{$sub}->() :
>>>          warn "Key <$sub> does not exist in the dispatch table";
>>     ( $dispatch{$sub} || sub { warn "no such action '$sub'" } )->();
>>
> 
> or  &{ ... || ... }->()
> 
> just to avoid problems like:
> 
>   print ( $dispatch{$sub} || sub { warn  } )->();

And you wonder why I dislike dispatch tables?  So simple in concept, so ugly in reality.


-- 
Just my 0.00000002 million dollars worth,
  Shawn

+------------\
| Shangri La  \
| 40,000 km   /
+------------/