# My memory of the gist of what's in the book, a few hours after having looked it up:
my $thing = do {
    if    ($cond1) { "Foo" }
    elsif ($cond2) { "Bar" }
    else           { "Baz" }
};