Select Code to Download

     10 10-19
    224 20-29
...
     73 40-49
     18 50-59
      4 60-69

$ curl -sS -o m#1 'http://tinymicros.com/pm/index.php?goto=MonkBirthda
+ys&start={0,50,100,150,200,250,300,350,400,450,500,550,600,650}'
$ perl -le 'for (0..13) {$x=$_*50;$y=sprintf q{%02d}, $_; system(qq{mv
+ m$x monk_birthday_$y.html})==0 or die;}'
...

$ perl -wlne '$c++; $t+=$_; END{print "Average: ", $t/$c/12}' ages_in_
+months.dat
Average: 33.1097861842105