* Mr. Shawn H. Corey <[EMAIL PROTECTED]> [2007-11-24 00:50]:
> my $sub = ( exists $dispatch{ $key } && ref( $dispatch{ $key } ) eq 'CODE' )
> ? $dispatch{ $key }
> : $dispatch{ 'default' };
>
> Just because you're not paranoid doesn't mean computers don't
> hate you :)So why did you skip the check for whether the default value is a CODE ref? Regards, -- Aristotle Pagaltzis // <http://plasmasturm.org/>
