File Coverage

lib/Aspect/Pointcut/OrOp.pm
Criterion Covered Total %
statement 12 13 92.3
branch 0 2 0.0
condition n/a
subroutine 4 5 80.0
pod 0 1 0.0
total 16 21 76.1


line stmt bran cond sub pod time code
1             package Aspect::Pointcut::OrOp;
2              
3 1     1   4 use strict;
  1         1  
  1         28  
4 1     1   4 use warnings;
  1         1  
  1         17  
5 1     1   2 use Carp;
  1         2  
  1         64  
6              
7 1     1   6 use base 'Aspect::Pointcut::BinOp';
  1         1  
  1         112  
8              
9 0 0   0 0   sub binop { $_[1] || $_[2] }
10              
11             1;