my $dum=$1; my $val; if ($dum) { $val = $value * $dum }else{ $val=$value} $val

##</code><code>##

$value * ($1 || 1)