$select->execute($type,$head[2]);
unless ($select->fetchrow){
my $file = get("http://game.planetarion.com/botfiles/${type}_listing.txt");
$select->execute($type,$head[2]);
unless ($select->fetchrow){
my $file = get("http://game.planetarion.com/botfiles/${type}_listing.txt");