p:\test>x1
500000500000

p:\test>x2
500000500000



##</code><code>##

map{ $sum += $_ } 1 .. 1000000; print $sum;

##</code><code>##

$sum += $_ for 1 .. 1000000; print $sum;