Crash when wrapped code changes $_

I already create bug [RT#81723](https://rt.cpan.org/Public/Bug/Display.html?id=81723), but with no response, and hope that this pull request will speedup things.

Class::Method::Modifiers generate code, that sensitive to modification of 
`$_` variable:

```perl
$_->(@_) for @$before;
```

Above constructs will die if coderefs in `@$before` array will modify `$_`

In attach fix + test that dies with version 1.12