File Coverage

blib/lib/File/Comments/Plugin/Python.pm
Criterion Covered Total %
statement 17 19 89.4
branch n/a
condition n/a
subroutine 6 7 85.7
pod 0 2 0.0
total 23 28 82.1


line stmt bran cond sub pod time code
1             ###########################################
2             # File::Comments::Plugin::Python
3             # 2005, Mike Schilli
4             ###########################################
5              
6             ###########################################
7             package File::Comments::Plugin::Python;
8             ###########################################
9              
10 9     9   7501 use strict;
  9         17  
  9         288  
11 9     9   110 use warnings;
  9         23  
  9         204  
12 9     9   47 use File::Comments::Plugin;
  9         15  
  9         174  
13 9     9   5318 use File::Comments::Plugin::Makefile;
  9         25  
  9         269  
14 9     9   55 use Log::Log4perl qw(:easy);
  9         18  
  9         43  
15              
16             our $VERSION = "0.01";
17             our @ISA = qw(File::Comments::Plugin::Makefile);
18              
19             ###########################################
20             sub init {
21             ###########################################
22 11     11 0 59 my($self) = @_;
23              
24 11         73 $self->register_suffix(".py");
25             }
26              
27             ###########################################
28             sub type {
29             ###########################################
30 0     0 0   my($self, $target) = @_;
31              
32 0           return "python";
33             }
34              
35             1;
36              
37             __END__