File Coverage

blib/lib/Module/Compile/Opt.pm
Criterion Covered Total %
statement 6 8 75.0
branch 0 2 0.0
condition 0 3 0.0
subroutine 2 3 66.6
pod 0 1 0.0
total 8 17 47.0


line stmt bran cond sub pod time code
1 1     1   953 use strict; use warnings;
  1     1   2  
  1         37  
  1         6  
  1         1  
  1         89  
2             package Module::Compile::Opt;
3              
4             # TODO; What is this module for?
5             # sub import {
6             # my ($class, @args) = @_;
7             # my $opts = $class->get_options(@args)
8             # if $class->can('get_options');
9             # $class->sanity_check($opts);
10             # require Module::Compile;
11             # require Module::Compile::Ext;
12             # Module::Compile::Ext->import(@{$opts->{ext}});
13             #
14             # # put coderef into @INC
15             # # Store PERL5OPT in .author
16             # # In Module::Compile, complain if PERL5OPT != .author/PERL5OPT
17             # }
18              
19             sub sanity_check {
20 0     0 0   my $class = shift;
21 0 0 0       die unless -e 'inc' and -e 'Makefile.PL';
22             }
23              
24             1;