";
while (list($num, $sub) = each($domainarray)) {
++$num;
$sub = trim($sub);
print "\t\n";
print "\t| http://$sub.$domain.$topdom | \n";
print "\t".date('c')." | \n";
print "\t
\n";
}
print "";
} else {
print "\n";
print "\n";
print "\n";
while (list($num, $sub) = each($domainarray)) {
++$num;
$sub = trim($sub);
print "\t\n";
print "\thttp://$HTTP_HOST/?url=$sub.$domain.$topdom\n";
print "\t".date('c')."\n";
print "\tweekly\n";
print "\t0.8\n";
print "\t\n";
}
$filename = "cgi-bin/domainlist.txt";
$filestring = file_get_contents($filename);
$filearray = explode("\n", $filestring);
while (list($var, $val) = each($filearray)) {
++$var;
$val = trim($val);
print "\t\n";
print "\thttp://$HTTP_HOST/?url=$subdom.$val\n";
print "\t".date('c')."\n";
print "\tweekly\n";
print "\t0.8\n";
print "\t\n";
}
print "";
}
?>