Select Code to Download

use 5.010;

...
send_3( {"foo"=>42, "bar"=>'code'});
send_3( "baz"=>11, "zab"=>'dong');

fbrm@monastery:~/CODE/PERL/monks$ perl x
foo ~> 42
...
zab ~> dong
foo ~> default
baz ~> 11