for my $y (0..@x-1) { }
# or #
for my $y (0..$#x) { }