sub config { my $str = ""; my $browser = $Request->ServerVariables("HTTP_USER_AGENT")->item(); SWITCH: { if ($browser =~ /MSIE/) { $browser = "MSIE"; last SWITCH; } if ($browser =~ /Firefox/) { $browser = "FireFox"; last SWITCH; } } $str .= "$Session->{'usrSystem'}"; $str .= "$Session->{'usrAccount'}"; $str .= "$Session->{'usrPassword'}"; $str .= "$browser"; $str .= "$Session->{'mode'}"; $str .= "$Session->{'version'}"; $str .= "".$Application->{'currentUserCount'}.""; # if($Session->{'trainingDelegate'}) # { # $str .= "True"; # } if ($Session->{'acrobatVersion'} >= $Session->{'minAcrobatVersion'} || $Request->ServerVariables("HTTP_USER_AGENT")->item() =~ /Mac/) { $str .= "{'acrobatVersion'}."\"/>\n"; } else { $str .= ""; ### chat pulls from here #### } if (getConfig() =~ /(/s) { $str .= $1." system=\"".$Session->{'usrSystem'}."\" account=\"".$Session->{'usrAccount'}."\" username=\"".$Session->{'usrID'}."\" password=\"".$Session->{'usrPassword'}."\"/>"; } $str .= ""; return $str; }