use Subs; my %menu = ( n => \&Subs->new; ); . . . $menu{n}->(); [download]
In reply to references to subroutines by Anonymous Monk