logo
Free, unlimited AI code reviews that run on commit
git-lrc git-lrc GitHub Install Now We'd appreciate a star git-lrc - Free, unlimited AI code reviews that run on commit | Product Hunt git-lrc - Free, unlimited AI code reviews that run on commit | Product Hunt

Perl::Critic::Annotation - A "## no critic" annotation in a document.

Author

       Jeffrey Ryan Thalhammer <jeff@imaginative-software.com>

Class Methods

       create_annotations( -doc => $doc )
           Given  a  Perl::Critic::Document,  finds  all  the  "##  no  critic" annotations and constructs a new
           "Perl::Critic::Annotation" for each one and returns them.  The order of the returned objects  is  not
           defined.   It  is  generally  expected  that  clients will use this interface rather than calling the
           "Perl::Critic::Annotation" constructor directly.

Constructor

       "new( -element => $ppi_annotation_element )"
           Returns a reference to a new Annotation object.  The -element argument is required and  should  be  a
           "PPI::Token::Comment" that conforms to the "## no critic" syntax.

Description

       "Perl::Critic::Annotation" represents a single "## no critic" annotation in a PPI::Document.  The
       Annotation takes care of parsing the annotation and keeps track of which lines and Policies it affects.
       It is intended to encapsulate the details of the no-critic annotations, and to provide a way for Policy
       objects to interact with the annotations (via a Perl::Critic::Document).

Interface Support

       This is considered to be a non-public class.  Its interface is subject to change without notice.

Methods

       disables_line( $line )
           Returns true if this Annotation disables $line for any (or all) Policies.

       disables_policy( $policy_object )
       disables_policy( $policy_name )
           Returns true if this Annotation disables $polciy_object or $policy_name at any (or all) lines.

       disables_all_policies()
           Returns  true if this Annotation disables all Policies at any (or all) lines.  If this method returns
           true, "disabled_policies" will return an empty list.

       effective_range()
           Returns a two-element list, representing the first and last line numbers where  this  Annotation  has
           effect.

       disabled_policies()
           Returns  a  list  of the names of the Policies that are affected by this Annotation.  If this list is
           empty, then it means that all Policies are affected by this Annotation,  and  disables_all_policies()
           should return true.

       element()
           Returns  the  PPI::Element  where  this  annotation  started.   This  is  typically  an  instance  of
           PPI::Token::Comment.

Name

       Perl::Critic::Annotation - A "## no critic" annotation in a document.

Synopsis

         use Perl::Critic::Annotation;
         $annotation = Perl::Critic::Annotation->new( -element => $no_critic_ppi_element );

         $bool = $annotation->disables_line( $number );
         $bool = $annotation->disables_policy( $policy_object );
         $bool = $annotation->disables_all_policies();

         ($start, $end) = $annotation->effective_range();
         @disabled_policy_names = $annotation->disabled_policies();

See Also