File Coverage

blib/lib/Bot/ChatBots/Role/Processor.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 1 1 100.0
total 18 18 100.0


line stmt bran cond sub pod time code
1             package Bot::ChatBots::Role::Processor;
2 4     4   91762 use strict;
  4         13  
  4         98  
3 4     4   18 use warnings;
  4         6  
  4         138  
4             { our $VERSION = '0.009'; }
5              
6 4     4   18 use Moo::Role;
  4         7  
  4         19  
7             requires 'process';
8              
9             sub processor {
10 2     2 1 4035 my $self = shift;
11 2     3   11 return sub { return $self->process(@_) };
  3         2152  
12             }
13              
14             1;