version 1.9, 2002/08/01 20:49:06
|
version 1.10, 2002/08/02 12:41:20
|
Line 450 sub BuildStatisticsTable {
|
Line 450 sub BuildStatisticsTable {
|
$urlres=$Map; |
$urlres=$Map; |
####################### |
####################### |
|
|
# $res = '<a href="'.$cache->{'src_'.$ResId}.'">'.$res.'</a>'; |
# $res = '<a href="'.$cache->{$ResId.':source'}.'">'.$res.'</a>'; |
#$Map = '<a href="'.$Map.'">'.$res.'</a>'; |
#$Map = '<a href="'.$Map.'">'.$res.'</a>'; |
|
|
#------------------------ Compute the Average of Tries about one problem |
#------------------------ Compute the Average of Tries about one problem |
Line 599 sub TableRow {
|
Line 599 sub TableRow {
|
my ($ResId,$Dummy)=split(/\*/,$Prob); |
my ($ResId,$Dummy)=split(/\*/,$Prob); |
$Ptr="\n".'<br>'. |
$Ptr="\n".'<br>'. |
"\n".'"'.($RealIdx+1).'",'. |
"\n".'"'.($RealIdx+1).'",'. |
"\n".'"'.$cache->{'title_'.$ResId}.$Dummy.'",'. |
"\n".'"'.$cache->{$ResId.':title'}.$Dummy.'",'. |
"\n".'"'.$cache->{'src_'.$ResId}.'",'. |
"\n".'"'.$cache->{$ResId.':source'}.'",'. |
"\n".'"'.$StdNo.'",'. |
"\n".'"'.$StdNo.'",'. |
"\n".'"'.$TotalTries.'",'. |
"\n".'"'.$TotalTries.'",'. |
"\n".'"'.$MxTries.'",'. |
"\n".'"'.$MxTries.'",'. |