Array Perl

# Adding elements to the end of a list
@names=("A", "B", "C", "D");
push(@names, "Jim", "Joseph", "Archie");
print "@names \n";