Help for this page

Select Code to Download

Select or download this
```
for ($i=0; $i<1e6; $i++) {
...
```

Select or download this

my $total;
for (1..1_000_000) {
 $total += $_ for split "";
}
print "$total\n";