print "Content-Type: text/plain\n\nSnapshot: $logdate\n\n", $logtext,
"-------------------------------------------------\n\n",
print "Content-Type: text/plain\n\nSnapshot: $logdate\n\n", $logtext,
"-------------------------------------------------\n\n",