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