File Coverage

blib/lib/Scalar/Andand/Undef.pm
Criterion Covered Total %
statement 10 10 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 0 1 0.0
total 14 15 93.3


line stmt bran cond sub pod time code
1             package Scalar::Andand::Undef;
2              
3 3     3   14 use strict;
  3         6  
  3         92  
4 3     3   15 use warnings;
  3         5  
  3         162  
5             our $VERSION = 0.05;
6              
7 3     3   2747 use Class::Null;
  3         10361  
  3         165  
8             my $noop = Class::Null->new;
9              
10             sub andand {
11 1     1 0 457 return $noop;
12             }
13              
14             1;