sub scanUrl {
  my $_url = $in{url};
  my $_startingNumber = 0;
  my $_tnum = 0;
  my $_endingNumber = 100000;
  while($_endingNumber > $_startingNumber) {
    if($_tnum == 10) {
      print ".";
      $_tnum = 0;
    }
    sleep(1);
  }
}