in reply to Re^3: A short, "iffy" rant
in thread A short, "iffy" rant

if ($self->hungry()) { $self->go_eat(); return; } if ($theater->is_open() && $self->wants_movie()) { $self->go_watch_movie(); return; } ....

If it is important that the maintainer notice that each choice is mutually exclusive, then make them extremely obviously mutually exclusive.

Also, Ovid is discussing the fact that most if-statements are of a form that would be better written as a switch statement. Additionally, switch statements, in Perl, are nearly always better written as dispatch tables. And, if you really want a dispatch table, try the following:

my @dispatch = ( [ sub { $_[0]->is_hungry }, sub { $_[0]->go_eat } ], ); foreach my $choice (@dispatch) { next unless $choice->[0]->( $self ); $choice->[1]->( $self ); last; }

There's no rule that says dispatch tables have to be hashes of subrefs.

Being right, does not endow the right to be rude; politeness costs nothing.
Being unknowing, is not the same as being stupid.
Expressing a contrary opinion, whether to the individual or the group, is more often a sign of deeper thought than of cantankerous belligerence.
Do not mistake your goals as the only goals; your opinion as the only opinion; your confidence as correctness. Saying you know better is not the same as explaining you know better.