@array = (0..1_000_000);
foreach (@array) { $i++ }