Select Code to Download

package Foo;
sub FACTORY_CLASS () { 'Bar' }
...
    my @params = @_;
    bless \@params, $self->FACTORY_CLASS();
}