BEGIN {
    my $var = 10;
    sub next {
      return ++$var;
    }
  }

##</code><code>##

  sub next {
    state $var = 10;
    return ++$var;
  }