my $s = sub { state $x = 42; $x++ }; say &$s();