Help for this page
use Data::Dumper; my %h=( HELP => sub {print qq(help\n)}, ... $h{Q} = $h{HELP}; print Dumper(%h); print $h{Q}();
$VAR1 = 'Q'; $VAR2 = sub { "DUMMY" }; ... $VAR6 = sub { "DUMMY" }; help 1