perl - 如何检查表单变量是否等于 Perl 中的某个值？

Question

我是 Perl 新手，过去主要使用 php，

通常检查 get 变量是否等于某个值，然后如果是则执行其他操作，我会这样做

if ($_GET['page'] == 'news') { 
echo 'yessss';
}

但我不太确定如何使用 perl :$ 有人可以帮助我吗？ :)

谢谢!

Answer 1

在Perl中，存在CGI模块， http://perldoc.perl.org/CGI.html#SYNOPSIS->param 获取输入参数。

use CGI;
my $q = CGI->new;
print $q->header();
if ($q->param('page') eq 'news') {
  print "...";
}