PPeerrll::::CCrriittiicc::::PPoolliiccyy::::CCUoosnnettrrrooClloSSntttrrruuiccbttuuutrreeedss::P::ePPrrrloohhDiiobbciiuttmLLeaanbbteealltssiWWoiintthhSSppeecciiaallBBlloocckkNNaammeess((33))



NNAAMMEE
       Perl::Critic::Policy::ControlStructures::ProhibitLabelsWithSpecialBlockNames
       - Don't use labels that are the same as the special block names.

AAFFFFIILLIIAATTIIOONN
       This Policy is part of the core Perl::Critic distribution.

DDEESSCCRRIIPPTTIIOONN
       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.

CCOONNFFIIGGUURRAATTIIOONN
       This Policy is not configurable except for the standard options.

SSEEEE AALLSSOO
       The Perl Buzz article on this issue at
       http://perlbuzz.com/2008/05/colons-invalidate-your-begin-and-end-blocks.html
       <http://perlbuzz.com/2008/05/colons-invalidate-your-begin-and-end-
       blocks.html>.

AACCKKNNOOWWLLEEDDGGMMEENNTT
       Randy Lauen for identifying the problem.

AAUUTTHHOORR
       Mike O'Regan

CCOOPPYYRRIIGGHHTT
       Copyright (c) 2008-2010 Mike O'Regan.  All rights reserved.

       This program is free software; you can redistribute it and/or modify it
       under the same terms as Perl itself.



Ppeerrll::vC5r.i1t2i.c2::Policy::ControlStruct2u0r1e1s-:0:8P-r1o4hibitLabelsWithSpecialBlockNames(3)
