Help for this page

Select Code to Download

Select or download this
```
my @a = (1..999);
for my $i (@a) {
```

Select or download this

my $j = 0;
my @a = map {++$j} (1..999);
for my $i (@a) {