###########################
#output anime to file#

proc animeFileList { } {

		set fp [open "~/public_html/anime.txt" w]
		sqlite3 animeDB animeData.db

		animeDB eval { SELECT * FROM anime ORDER BY name;} {
			puts $fp "<span style=\"color:#3afc00;\">$name</span> ::: <span style=\"color:#ff00ff;\"><a href=\"$clink\">$cep</a></span> ::: <span style=\"color:#aa69b7;\">[string range $datestamp 5 [string length $datestamp]]</span><br/>"
		}
		animeDB close

		close $fp

		set fb [open "~/public_html/topic.txt" w]
		puts $fb [topic #anime]
		close $fb