100 sum: 3 101 sum: 6 102 sum: 9 ... #### perl -E '$sum=0;for(1..1e6){$sum+=length($_);} say $sum;'