generating metadata: perl/B-Hooks-EndOfScope