Select Code to Download

package foo;
sub run_foo {
...
    $obj2->attribute;
}
1;

PerlEnviromnent foo = loadPerlPackage("foo.pm");
foo.runSub('run_foo',some_object,another_object);