File Coverage

blib/lib/Perl/Critic/Policy/Freenode/DollarAB.pm
Criterion Covered Total %
statement 9 10 90.0
branch n/a
condition n/a
subroutine 3 4 75.0
pod 1 1 100.0
total 13 15 86.6


line stmt bran cond sub pod time code
1             package Perl::Critic::Policy::Freenode::DollarAB;
2              
3 1     1   888 use strict;
  1         4  
  1         36  
4 1     1   7 use warnings;
  1         3  
  1         34  
5              
6 1     1   7 use parent 'Perl::Critic::Policy::Community::DollarAB';
  1         2  
  1         1594  
7              
8             our $VERSION = 'v1.0.1';
9              
10 0     0 1   sub default_themes { 'freenode' }
11              
12             1;
13              
14             =head1 NAME
15              
16             Perl::Critic::Policy::Freenode::DollarAB - Don't use $a or $b as variable names
17             outside sort
18              
19             =head1 DESCRIPTION
20              
21             Legacy C<freenode> theme policy alias.
22              
23             =head1 POLICY MOVED
24              
25             This policy has been moved to the C<community> theme and renamed to
26             L<Perl::Critic::Policy::Community::DollarAB>.
27              
28             =head1 AFFILIATION
29              
30             This policy is part of L<Perl::Critic::Freenode>.
31              
32             =head1 CONFIGURATION
33              
34             This policy can be configured to allow C<$a> and C<$b> in additional functions,
35             by putting an entry in a C<.perlcriticrc> file like this:
36              
37             [Freenode::DollarAB]
38             extra_pair_functions = pairfoo pairbar
39              
40             =head1 AUTHOR
41              
42             Dan Book, C<dbook@cpan.org>
43              
44             =head1 COPYRIGHT AND LICENSE
45              
46             Copyright 2015, Dan Book.
47              
48             This library is free software; you may redistribute it and/or modify it under
49             the terms of the Artistic License version 2.0.
50              
51             =head1 SEE ALSO
52              
53             L<Perl::Critic>, L<Perl::Critic::Community>