如何使用Perl的CGI.pm识别协议(http与https)

发布时间：2020-12-15 21:43:32 所属栏目：大数据来源：网络整理

导读：我正在编辑一个在HTTPS下运行时进行特殊处理的Perl CGI应用程序. 现在,我试图通过在请求URI中手动查找“https：//”来检测它： my $is_secure = $cgi-request_uri =~ m{^https://}; 有一个稍微清洁的方式这样做？解决方法根据 the documentation,CGI.pm有

我正在编辑一个在HTTPS下运行时进行特殊处理的Perl CGI应用程序.

现在,我试图通过在请求URI中手动查找“https：//”来检测它：

my $is_secure = $cgi->request_uri =~ m{^https://};

有一个稍微清洁的方式这样做？

解决方法

根据 the documentation,CGI.pm有一个https()方法：

operates on the HTTPS environment variables present when the SSL protocol is in effect. Can be used to determine whether SSL is turned on.

这可能就是你要找的东西.如果没有参数,它将返回HTTPS环境变量列表.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!