Select Code to Download

...
my $method = $dispatch{ $command };
$self->$method( );
...

my $method = $self->can( $dispatch( $command ) );
unless( defined $method ) {
...
  return;
}
$self->$method( );