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__ |