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 2     2   12 use strict;
  2         4  
  2         72  
4 2     2   12 use warnings;
  2         3  
  2         156  
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 2     2   10 use parent 'autobox::List::Util';
  2         30  
  2         24  
16 2     2   53530 use parent 'autobox::Core';
  2         6  
  2         15  
17 2     2   45390 use parent 'autobox::dump';
  2         4  
  2         15  
18              
19             sub import {
20 10     10   26 my $class = shift;
21 10         85 $class->autobox::import();
22 10         5649 $class->autobox::import(
23             UNIVERSAL => 'perl5i::1::UNIVERSAL',
24             DEFAULT => 'perl5i::1::'
25             );
26 10         8404 autobox::List::Util::import($class);
27 10         12469 autobox::Core::import($class);
28 10         11816 autobox::dump::import($class);
29             }
30              
31             1;