File Coverage

blib/lib/perl5i/1/autobox.pm
Criterion Covered Total %
statement 21 21 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod n/a
total 27 27 100.0


line stmt bran cond sub pod time code
1             package perl5i::1::autobox;
2              
3 1     1   4 use strict;
  1         1  
  1         28  
4 1     1   4 use warnings;
  1         2  
  1         53  
5              
6             # Load these after we're fully compiled because they
7             # use us internally.
8             require perl5i::1::SCALAR;
9             require perl5i::1::ARRAY;
10             require perl5i::1::HASH;
11             require perl5i::1::UNIVERSAL;
12             require perl5i::1::CODE;
13              
14             # List::Util needs to be before Core to get the C version of sum
15 1     1   5 use parent 'autobox::List::Util';
  1         16  
  1         7  
16 1     1   9028 use parent 'autobox::Core';
  1         3  
  1         5  
17 1     1   8266 use parent 'autobox::dump';
  1         2  
  1         5  
18              
19             sub import {
20 5     5   11 my $class = shift;
21 5         29 $class->autobox::import();
22 5         1678 $class->autobox::import(
23             UNIVERSAL => 'perl5i::1::UNIVERSAL',
24             DEFAULT => 'perl5i::1::'
25             );
26 5         2569 autobox::List::Util::import($class);
27 5         1909 autobox::Core::import($class);
28 5         2367 autobox::dump::import($class);
29             }
30              
31             1;