#!/usr/bin/perl
@list = (1, 2, 3);                  # initialize @list
push (@list, 10, 20, 30);           # @list now equals (1, 2, 3, 10, 20, 30)
print ("@list\n");                  # prints @list and goes to a new line
_END_
