#!/usr/bin/perl
## LOGIN FORM TEMPLATE FILE
print "
Chatting in $FORM{'site'}
";
&opensystemp;
print "
|
|
";
### DONT EDIT ANYTHING BELOW ###
sub opensystemp {
print " ";
open(sFILE6,"$basenetworkdir/tempfiles/chatsystems/$FORM{'site'}.html");
@sLINES6 =