version 1.9, 2004/01/14 01:39:14
|
version 1.10, 2004/01/14 01:42:09
|
Line 116 sub main {
|
Line 116 sub main {
|
$userinfo{'request.role'}." "; |
$userinfo{'request.role'}." "; |
} |
} |
&add_count('Browser',$userinfo{'browser.type'},$userinfo{'browser.version'}); |
&add_count('Browser',$userinfo{'browser.type'},$userinfo{'browser.version'}); |
&add_count('OS',$userinfo{'browser.os'}); |
&add_count('OS',$userinfo{'browser.os'},$userinfo{'browser.type'}); |
if ($userinfo{'request.course.id'}) { |
if ($userinfo{'request.course.id'}) { |
my $cid=$userinfo{'request.course.id'}; |
my $cid=$userinfo{'request.course.id'}; |
my $coursename= $userinfo{'course.'.$cid.'.description'}. |
my $coursename= $userinfo{'course.'.$cid.'.description'}. |