Я использую Perl 5.8, и мне нужно назначить значение по умолчанию. В итоге я сделал следующее:
if ($model->test) {
$review = "1"
} else {
$review = ''
}
Значение $ model-> test
будет либо «1»
, либо неопределенным. Если что-то есть в $ model-> test
, установите для $ review
значение «1»
, в противном случае установите значение ''
.
Поскольку это не Perl 5.10, я не могу использовать новый шикарный оператор defined-or. Моей первой реакцией было использование тернарного оператора вот так ...
defined($model->test) ? $review = "1" : $review = '';
, но это тоже не сработало.
Есть ли у кого-нибудь идеи, как это назначить более эффективно? Джени