如何检查表单变量是否等于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 "...";
}