open(DAT,">>$sitedata") || die("Cannot Open File");