#!/usr/bin/perl
#for($num=100001;$num<100020;$num++)
for($num=100000;$num<101827;$num++)
{
print $num;
$string = "lynx -source http://www.execpc.com/~goodscnt/msds/md$num.html > files/md$num.html";
system "$string";
sleep 1;
}