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