File Coverage

blib/lib/Test/Mocha/CalledOk/Times.pm
Criterion Covered Total %
statement 13 13 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 0 2 100.0
total 18 20 100.0


line stmt bran cond sub pod time code
1             package Test::Mocha::CalledOk::Times;
2             # ABSTRACT: Concrete subclass of CalledOk for verifying methods called an exact number of 'times'
3             $Test::Mocha::CalledOk::Times::VERSION = '0.61';
4 21     21   81 use strict;
  21         28  
  21         532  
5 21     21   74 use warnings;
  21         22  
  21         412  
6 21     21   8379 use parent 'Test::Mocha::CalledOk';
  21         4853  
  21         110  
7              
8             sub is {
9             # uncoverable pod
10 174     174 0 194 my ( $class, $got, $exp ) = @_;
11 174         383 return $got == $exp;
12             }
13              
14             sub stringify {
15             # uncoverable pod
16 174     174 0 239 my ( $class, $exp ) = @_;
17 174         405 return "$exp time(s)";
18             }
19              
20             1;