a if (my $o) = b;
c unless $o;

##</code><code>##

$ perl -wl
print "if!" if (my $o) = 0;
print "unless!" unless $o;
__END__
if!
unless!