Question

perl 得出一个变量数值，怎么判断这个数值大于1或者小于1？并且给出不同答案。

后台*.pm文件代码：

for(@$list) {
$_->{file_size} = $ses->makeFileSize($_->{file_size});
$_->{download_link} = $ses->makeFileLink($_);

$_->{wait_info} = 123; // 这里得出变量数值是123

}

在前端模块html文件里调用代码是：<TMPL_VAR wait_info> 输出是123，我想给这个123做个判断，如果123大于1显示“成功”，如果123（为负数）小于1显示“失败”，我应该怎么写。

本人是小白，求高手赐教。

Answer 1

if($_->{wait_info} > 1){
print"成功\n";
}else{
print"失败\n";
}

追问

按您的写法是这样：
$_->{wait_info} = 123;
if($_->{wait_info} > 1){
print '成功';
}else{
print '失败';
}
我在模块 并不会进行判断，它仍然输出123，怎么解决？？请赐求