Select Code to Download

sub HollyGame::ElfRanger::new {
    my( $class, %options ) = @_;
...
    $options{ race  } = HollyGame::Elf->new(...);
    bless \%options => $class;
}

sub HollyGame::RaceClassBase::new {
    my( $class, %options ) = @_;
...
...

HollyGame::ElfRanger->new();

sub new {
    my( $class, %options) = @_;
...

    bless \%options => $class;
}