{
    our $state = 42;

    sub open_sub {
          return $state++;
    }
}

say open_sub();    # 42
$main::state = 666;
say open_sub();  # 666