print "Creating files in $dir...";
-&append_to_file( "$dir/blacklist", "" );
&append_to_file( "$dir/moderators", "ADMIN \U$password\n" );
&append_to_file( "$dir/rejection-reasons",
"offtopic::a blatantly offtopic article, spam
harassing::message of harassing content
charter::message poorly formatted
" );
-&append_to_file( "$dir/whitelist", "" );
print "\b\b\b done.\n";