Select Code to Download

#instead of:
for (1..100000) {
...
   $pb->update($_); #update progressbar
   $mw->upddate();
}