File Coverage

blib/lib/Inline/Module/LeanDist.pm
Criterion Covered Total %
statement 12 12 100.0
branch 1 2 50.0
condition n/a
subroutine 3 3 100.0
pod n/a
total 16 17 94.1


line stmt bran cond sub pod time code
1             package Inline::Module::LeanDist;
2              
3 1     1   16249 use strict;
  1         2  
  1         33  
4              
5 1     1   3 use File::Path;
  1         2  
  1         187  
6              
7             our $VERSION = '0.101';
8              
9             our $inline_build_path = '.inline';
10              
11              
12             sub import {
13 1     1   6 my $class = shift;
14              
15 1 50       15 File::Path::mkpath($inline_build_path)
16             unless -d $inline_build_path;
17              
18 1         2 my ($module_name) = caller;
19              
20 1         609 require Inline;
21              
22 1         16685 Inline->import(
23             Config =>
24             directory => $inline_build_path,
25             name => $module_name,
26             CLEAN_AFTER_BUILD => 0,
27             );
28              
29 1         82 Inline->import_heavy(@_);
30             }
31              
32              
33             1;
34              
35              
36             __END__