Select Code to Download

# Define appropriate "methods"
my @dispatch_methods = qw [ company financialDiary ];

...
        map { $_ => dispatch_add{$_} } @dispatch_methods
    };
}

$thing->{dispatch}->{company}->($param);