File Coverage

blib/lib/Plack/Middleware/Antibot/FilterBase.pm
Criterion Covered Total %
statement 15 16 93.7
branch n/a
condition n/a
subroutine 5 6 83.3
pod 3 3 100.0
total 23 25 92.0


line stmt bran cond sub pod time code
1             package Plack::Middleware::Antibot::FilterBase;
2              
3 6     6   2514 use strict;
  6         11  
  6         187  
4 6     6   25 use warnings;
  6         8  
  6         137  
5              
6 6     6   24 use Carp qw(croak);
  6         7  
  6         730  
7              
8             sub new {
9 35     35 1 69 my $class = shift;
10 35         75 my (%params) = @_;
11              
12 35         62 my $self = {};
13 35         103 bless $self, $class;
14              
15 35         119 return $self;
16             }
17              
18             sub score {
19 11     11 1 22 $_[0]->{score};
20             }
21              
22 0     0 1   sub execute {
23             }
24              
25             1;
26             __END__