在perl中检测浏览器，如何检查浏览器是否为perl中的Internet Explorer（IE）

Question

​​

我正在使用此代码，但javascript无法识别变量。

所以变量$ msg_box_ok_id不会改变。

Answer 1

此代码无法工作。

我假设你的Perl代码运行在web服务器上，但是你的JavaScript运行在客户端PC上。

所以JavaScript代码不能以这种方式影响服务器上的程序逻辑。

查看HTTP::BrowserDetect模块的示例。

顺便说一句，在JavaScript浏览器检测将不会工作，要么是这样的： http://www.w3schools.com/jsref/prop_nav_useragent.asp

/* check the agent */ 
function checkBrowserName(name){ 
    var agent = navigator.userAgent.toLowerCase(); 
    if (agent.indexOf(name.toLowerCase())>-1) { 
    return true; 
    } 
    return false; 
} 


if(checkBrowserName('MSIE')){ 
    alert('Internet Explorer!'); 
}