Help for this page
my @dispatch = ( [ sub { shift =~ m/test/ } => sub { action } ], ... last; } }
my @dispatch = ( ... same as above ... ... $dispatch[ # In the table... firstidx { $_->[0]($test_value) } @dispatch # do a lookup... ]->[1](); # and take action.
my @dispatch = ( ...same as above ... ); ( first { $_->[0]($test_value) } @dispatch )->[1]();
www.com | www.net | www.org
No recent polls found