File Coverage

blib/lib/mcoder/array/set.pm
Criterion Covered Total %
statement 9 9 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 12 12 100.0


line stmt bran cond sub pod time code
1             package mcoder::array::set;
2              
3             our $VERSION = '0.01';
4              
5 1     1   580 use strict;
  1         2  
  1         36  
6 1     1   6 use warnings;
  1         2  
  1         81  
7              
8             require mcoder;
9              
10             sub import {
11 1     1   6 my $class=shift;
12 1         4 @_=($class, 'array_set', [@_]);
13 1         4 goto &mcoder::import
14             }
15              
16             1;
17             __END__