sub foo {
    (my $foo, state $bar) = (f(), g());
    ...
}

foo;
foo;  # Should g() be called?