Help for this page
BEGIN { my $var = 10; ... return ++$var; } }
sub next { state $var = 10; return ++$var; }