Select Code to Download

my %disp_table = ( something => \&do_something );

$disp_table{'something'}->();

($disp_table{'not there'} || sub {})->();

    one   => sub { print "Number!\n" },
    two   => sub { print "Number!\n" },
    three => sub { print "Number!\n" },

    one   => sub { print "The loneliest "; number() },
    two   => \&number,
    three => \&number,