'h|help' => \&help,

...

my $help = sub { ... }