foreach $a (0 .. $: - 1) {