File Coverage

blib/lib/Data/Monad/Base/Util.pm
Criterion Covered Total %
statement 10 10 100.0
branch 2 2 100.0
condition n/a
subroutine 4 4 100.0
pod 1 1 100.0
total 17 17 100.0


line stmt bran cond sub pod time code
1             package Data::Monad::Base::Util;
2 16     16   16391 use strict;
  16         20  
  16         538  
3 16     16   65 use warnings;
  16         23  
  16         385  
4 16     16   58 use Exporter qw(import);
  16         20  
  16         979  
5              
6             our @EXPORT_OK = qw(list);
7              
8 10 100   10 1 48 sub list { wantarray ? @_ : shift }
9              
10             1;
11             __END__