my $junk = 0; print 1 + ($junk || 15);