update perl-B-Hooks-EndOfScope