File Coverage

blib/lib/Module/Compile/Simple.pm
Criterion Covered Total %
statement 10 12 83.3
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 14 16 87.5


line stmt bran cond sub pod time code
1             package Module::Compile::Simple;
2 1     1   22371 use 5.006001;
  1         4  
  1         37  
3 1     1   4 use strict;
  1         2  
  1         37  
4 1     1   4 use warnings;
  1         6  
  1         94  
5             our $VERSION = '0.24';
6              
7 1     1   1357 use Module::Compile -base;
  0            
  0            
8              
9             sub pmc_compile {
10             my ($class, $source) = @_;
11             return "use 5.006001;
12             use strict;
13             use warnings;
14              
15             use Module::Compile -base;
16              
17             sub pmc_compile {
18             my (\$class, \$source) = \@_;
19             $source;
20             }
21              
22             1;
23             "
24             }
25              
26             1;
27              
28             __END__