@x = (1,2,3,4); #declare and initialize an array
print @x , "\n"; #prints 1234 - no spaces
print "@x\n"; #prints 1 2 3 4 - spaced
$x = @x;  #the size of the list/array
print "at x has $x elements\n"; #value will be 4