my @foo = 1 .. $x;