Select Code to Download

package ThisIsMyPackge;

...
sub apply {
  do something;
}

package ThisIsMyPackge;

...
use 79 more times ...

.....

foreach my $bar (@{$objects}) {
    my $foo = $bar->object;
...
    
    ....
}