## remarks.html ## ## final remarks sent by someone just taking the exam ## use Session; use Apache::Request; use Utils; use strict; my $session = new Session; exit( 0 ) unless ( defined $session ); my $r=$session->{request}; my $apr = $session->{apr}; my $uname=$apr->param('uname'); my $comment=$apr->param('text'); my $datenow = localtime; $comment =~ s/\s+/ /g; Utils::append_file("$EXAMDIR/logs/comments", "Comment:$datenow:$uname:$comment\n"); print <
Thank you
Your remarks have been received.
We wish you a very pleasant and successfull year in CEU.
Computer and Statistics Center
HTML return;