Select Code to Download

package Foo;

...
    my $class = ref($proto) || $proto;
    bless {}, $class;
}

package Foo;

...

    bless {}, $class;
}