my @a = [ 1, 4, 9, 16 ]; # squares