如何在共享主机上为Perl网站实施基于cookie的身份验证？

Question

我对Perl很陌生，我完全不知道如何处理这个问题。我们有一个以前使用Apache auth的旧Perl应用程序;我们希望用基于cookie的表单式认证来替换它。我明白这是非常具体的情况，并没有一个答案，但一些一般的提示将不胜感激。

我需要编辑网站上的所有.pl文件吗？或者是否有我可以使用的“金锤”解决方案？我可以使用CPAN吗？我们使用Perl v5.8.8，如果它很重要，我们正在使用Apache 2 共享托管。我很高兴根据需要提供更多信息。

Answer 1

谢谢您的回答家伙，但我最终还是决定CGI::Session::Auth::DBI这在共享主机效果很好。

Answer 2

你可以在a level outside the Perl program。

Answer 3

要验证/需要验证，需要通过最初接收用户请求的.pl文件进行检查。所以，所有的答案.pl文件是否需要改变取决于你的应用程序所采用的结构：

• 如果用户去http://myserver.com/one.pl做的第一件事，http://myserver.com/two.pl做的第二件事情，那么，是，您需要全部更改它们，因为它们都是单独接收请求。

• 如果用户去http://myserver.com/dispatch.pl?mode=one的第一件事就是http://myserver.com/dispatch.pl?mode=two第二件事，dispatch.pl电话要么one.pl或two.pl基础上，mode参数幕后，那么你只需要改变dispatch.pl，因为它是唯一一个直接接收用户的请求。

编辑补充：如果你正在处理的第一款车型，那么我强烈建议使用cookie操作代码设置外部模块（.pm文件）并调用从每个你的个人文件.pl，而不是在整个地方复制该代码。理想情况下，这将让你在每个.pl的添加的代码只有几行获得通过：

use MyCookieHandlingModule qw(verify_cookie redirect_to_login); 
my $q = CGI->new; # ...unless you're already using CGI in object-oriented mode 
redirect_to_login unless verify_cookie($q);