perl – 使用三元运算符分配？

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

导读：我在Perl 5.8上，需要分配一个默认值。我最终这样做： if ($model-test) { $review = "1"} else { $review = ''} $ model- test的值将为“1”或未定义。如果$ model-测试中有某些内容，则将$ review设置为“1”，否则设置为等于“”。因为它不是Perl 5.10我

我在Perl 5.8上，需要分配一个默认值。我最终这样做：

if ($model->test) {
    $review = "1"
} else {
    $review = ''
}

$ model-> test的值将为“1”或未定义。如果$ model->测试中有某些内容，则将$ review设置为“1”，否则设置为等于“”。

因为它不是Perl 5.10我不能使用新的swanky定义或运算符。我的第一反应就是用这样的三元运算符

defined($model->test) ? $review = "1" : $review = '';

但是也没有。

有没有人有一个想法如何更有效地分配？
珍妮

解决方法

我通常会写成：

$review = ( defined($model->test) ? 1 : '' );

其他括号内的其他人阅读代码的清晰度。

（编辑：李大同）

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