Remember that strict is only going to be honored in the scope it was declared in.

In this snippet of code, strict isn't making any difference to the code outside of the BEGIN block. Try placing a non-lexically scoped variable after the BEGIN block, and watch as perl let's it pass without complaining.