Perl::Critic::Policy::ControlStructures::ProhibitLabelsWithSpecialBlockNames3pm
Don't use labels that are the same as the special block names.
Affiliation
This Policy is part of the core Perl::Critic distribution.
Overview
When using one of the special Perl blocks "BEGIN", "END", "CHECK", "INIT", and "UNITCHECK", it is easy to mistakenly add a colon to the end of the block name. E.g.:
# a BEGIN block that gets executed at compile time.BEGIN { <...code...> }# an ordinary labeled block that gets executed at run time.BEGIN: { <...code...> }
The labels "BEGIN:", "END:", etc. are probably errors. This policy prohibits the special Perl block names from being used as labels.
Configuration
This Policy is not configurable except for the standard options.
Acknowledgment
Randy Lauen for identifying the problem.
Releases
10 releases since Debian 5.0 (Lenny); the text changed 9 times.