Select Code to Download

$self->{@persons[$self->getPersonCount()]}=$aPerson;

push @{$self->{persons}}, $aPerson;

$self->{@persons[$counter]}->printProperties();

$self->{persons}[$counter]->printProperties();