Speicherverwaltung mit Zeigern III

sortaddr3.pl

while (<$book>) { chomp; my @fields = split /:/; push(@addresses, \@fields); }

Unmittelbar nach der push-Operation gibt es zwei Verweise auf die zuvor von split zurückgelieferte Liste. Einen über @fields und einen über $addresses[0]. Entsprechend steigt der Referenzzähler auf 2.