|
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.
|
Copyright © 1996 - 2003 Andreas Borchert, in HTML konvertiert am 01.10.2003 |