version 1.46, 2002/08/14 20:42:48
|
version 1.47, 2002/08/21 17:18:08
|
Line 516 sub BuildStatistics {
|
Line 516 sub BuildStatistics {
|
my $cacheDB = "/home/httpd/perl/tmp/$ENV{'user.name'}". |
my $cacheDB = "/home/httpd/perl/tmp/$ENV{'user.name'}". |
"_$ENV{'user.domain'}_$courseID\_statistics.db"; |
"_$ENV{'user.domain'}_$courseID\_statistics.db"; |
|
|
$r->print(&Apache::lonhtmlcommon::Title('LON-CAPA Statistics')); |
$r->print(&Apache::lonhtmlcommon::Title('Course Statistics and Charts')); |
|
|
my ($returnValue, $students) = &PrepareData($c, $cacheDB, |
my ($returnValue, $students) = &PrepareData($c, $cacheDB, |
\@studentInformation, |
\@studentInformation, |