##
my $x = 0;
if ($x) {
f();
} else {
g(); # g() is the last expression evaluated.
}
####
my $x = 0;
if ($x) { # $x is the last expression evaluated.
f();
}
####
my $x = 0;
if ($x == 1) {
f();
} elsif ($x == 2) ( # $x==2 is the last expression evaluated.
g();
}