my $quality = ( $number >= 40 ) ? "old" : "still young";

print "$value will be $number in twenty years.<br>Wow $value, you're $quality!";