Select Code to Download

sub process {
  my $node = shift;
...
}

process({ 'a' => '1', 'b' => [ '2' ],  'c' => { 'd' => '3' } });

package Local::MyComp::Map;

...
sub keys { ... }

etc. etc.

  if (my $reftype = ref($node)) {
    if (blessed($node) && $node->isa(Local::MyComp::Map) {
      process_map($node);
    } 
  ...