my $foo = getFoo() ? 1 : 0;
  if ( $foo ){ ... }