如何在perl CGI中获取访问者浏览器窗口大小

Question

有谁知道如何在Perl CGI脚本中获取用户浏览器窗口的高度和宽度？

或者如何将这个值从javascript或其他语言传递给我的$ var ???

Answer 1

如果您正在谈论通过表单调用然后打印网站的perl脚本，您可以使用javascript来获取浏览器大小，将其放入隐藏的表单变量并使用CGI检索它们在你的perl脚本中。然后它可以对值进行反应，例如改变静态网页布局的大小。

在网站上，使用以下javascript：

<script type="text/javascript">
document.forms[0].windowheight.value = window.innerHeight;
document.forms[0].windowwidth.value = window.innerWidth;
</script>

但请记住，不同的浏览器在JS中使用不同的方式来获取大小值。也许this有帮助。您还可以使用jQuery来确定这些值。

当您在<form>中拥有它们并提交它时，您可以使用CGI模块读取它们，就像所有其他表单参数一样。它们是通过POST还是GET发送并不重要。

use strict;
use warnings;
use CGI;
my $cgi = CGI->new;
my $windowHeight = $cgi->param('windowheight');
my $windowWidth = $cgi->param('windowwidth');