if ($options{foo} and satisfy_bar()) { poit(); }
if (not $options{foo}) { narf(); }