Select Code to Download

#!/usr/bin/perl -w

...
        print "failed to get index. Trying again...\n";
    }
}

error in getting index 403 Forbidden
try again...