@a = (1, 2, 3);

print @a;
print $a[0], $a[1], $a[2];  # equivalent to @a