I am on Perl 5.8 and am needing to assign a default value. I ended up doing this:
if ($model->test) { $review = \"1\" } else { $review = \'\' }
Besides the conditional operator, I often like to use do, which returns the value from the last evaluated expression:
do
my $review = do { if( ... ) { 'foo' } elsif( ... ) { 'bar' } elsif( ... ) { 'baz' } else { 'defaut' } };