@sites="http://www.frozenhosting.com";
for( $i=1; $i<100000; $i++)  {
    $mech->get( $sites[$i] );
    ....
    $mech->content()=$html;
    $mech->find_all_links();
    $link->url_abs()=@sites;