Select Code to Download

package Foo;
use base Exporter;
...
    $foo = $_[0];
    Foo->export_to_level(1, @_); #export symbols to caller
}