sub foo { state $foo; $foo += @_; }