Select Code to Download

# in init phase:
my $commands = join "|", keys %myhash;
...
      $myhash{"error"}->( $_ );
   }
}