Help for this page

Select Code to Download


  1. or download this
    'persons' => ();
  2. or download this
    # this is all you need to add someone
push(@{$self->{persons}},$aPerson);
  3. or download this
    my $size = @{$self->{persons}};
for(0..$size) {
    printf("\t%18.18s => $_\n", "person number"); 
    @{$self->{persons}}[$_]->printProperties(); 
}