$ perl -le " for(1..3){my@f; print\@f }"
ARRAY(0x99a934)
ARRAY(0x99a934)
ARRAY(0x99a934)

$ perl -le " for(1..3){my@f; print\@f; push @global, \@f }"
ARRAY(0x99a954)
ARRAY(0x3f8cdc)
ARRAY(0x3f8d4c)