in reply to BEGIN and END blocks, use strict and scoping

Because the strict pragma is block-scoped and your BEGIN is a block.

In Section Seekers of Perl Wisdom