Select Code to Download

package Foo;

...
my $object = Bar->new(
    # A bunch of named parameters go here
);

package My::Base::Class;

...

    return $self;
}