print FIL "\n$ct is down at this time.\n";
open(FIL,">>$myfil") || die "No open for ct tot: $! \n";
[download]

Uh, this is bass-ackwards -- you print to the file before you open it. That isn't going to work at all.