@newlist= @{$self->{oldlist}}; # Direct copy #Alternative ... push @newlist, @{$self->{oldlist}}; # Stuff it in