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 18     18   21384 use strict;
  18         33  
  18         466  
3 18     18   82 use warnings;
  18         33  
  18         474  
4 18     18   82 use Exporter qw(import);
  18         26  
  18         1202  
5              
6             our @EXPORT_OK = qw(list);
7              
8 10 100   10 1 69 sub list { wantarray ? @_ : shift }
9              
10             1;
11             __END__