my $foo_is_ready = (foo1 && foo2) || (foo3 && bar1 && baz1); if ($foo_is_ready) { ... } #### my $first_foo = foo1 && foo2; my $second_foo = foo3 && bar1 && baz1; my $foo_is_ready = $first_foo || $second_foo; if ($foo_is_ready) { ... }