Select Code to Download

package Foo;

...

set_globals();
#... more code ...

################################
package Bar;
...
sub new {
    my ( $class, $args ) = @_;
    # etc...

use strict;
use Foo::Bar;
my $obj = Foo::Bar->new;

use Foo::Bar qw/noLog/;