File Coverage

blib/lib/Perl/Critic/Policy/Freenode/WhileDiamondDefaultAssignment.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::WhileDiamondDefaultAssignment;
2              
3 1     1   662 use strict;
  1         3  
  1         30  
4 1     1   5 use warnings;
  1         3  
  1         26  
5              
6 1     1   5 use parent 'Perl::Critic::Policy::Community::WhileDiamondDefaultAssignment';
  1         2  
  1         5  
7              
8             our $VERSION = 'v1.0.2';
9              
10 0     0 1   sub default_themes { 'freenode' }
11              
12             1;
13              
14             =head1 NAME
15              
16             Perl::Critic::Policy::Freenode::WhileDiamondDefaultAssignment - Don't use while
17             with implicit assignment to $_
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 L<Perl::Critic::Community>.
26              
27             =head1 AFFILIATION
28              
29             This policy is part of L<Perl::Critic::Freenode>.
30              
31             =head1 CONFIGURATION
32              
33             This policy is not configurable except for the standard options.
34              
35             =head1 AUTHOR
36              
37             Dan Book, C<dbook@cpan.org>
38              
39             =head1 COPYRIGHT AND LICENSE
40              
41             Copyright 2015, Dan Book.
42              
43             This library is free software; you may redistribute it and/or modify it under
44             the terms of the Artistic License version 2.0.
45              
46             =head1 SEE ALSO
47              
48             L<Perl::Critic>, L<Perl::Critic::Community>