sub f { my $x if 0; return $x++ } #### { my $x; sub f { return $x++ } } #### sub f { state $x; return $x++ }