my $bar = baz();
    if ($@) {
        die "baz failed: $@\n";
    }   #              ^^^^