Select Code to Download

package Foo;

...
  my $object = $self->{otherobject};
  $object->method3(@_);
}

package Foo;

...
  method2 => "object"
  method3 => "otherobject"
);