| line |
true |
false |
branch |
|
19
|
0 |
3 |
if ($^O =~ /^(dos|os2)/i) { } |
|
|
0 |
3 |
elsif ($^O =~ /^MacOS/i) { } |
|
31
|
1 |
6 |
unless (exists $p{'file'} and -f $p{'file'}) |
|
51
|
12 |
22 |
if ($module eq lc $module) |
|
53
|
6 |
6 |
if $self->{'verbose'} |
|
57
|
0 |
22 |
if $module =~ /^Carp/ |
|
61
|
20 |
2 |
if (my($dir, $file) = $module =~ m[^(.*)/(.*)$]) { } |
|
65
|
5 |
15 |
if (_module_installed($package)) { } |
|
67
|
2 |
3 |
if $self->{'verbose'} |
|
73
|
15 |
0 |
unless (-d "$self->{'lib'}/$dir") |
|
75
|
0 |
15 |
unless make_path("$self->{'lib'}/$dir") |
|
78
|
15 |
0 |
unless (-f "$self->{'lib'}/$path") |
|
80
|
0 |
15 |
unless open my $wfh, '>', "$self->{'lib'}/$path" |
|
82
|
0 |
15 |
unless close $wfh |
|
91
|
2 |
0 |
unless (-f "$self->{'lib'}/$module_file") |
|
93
|
0 |
2 |
unless open my $wfh, '>', "$self->{'lib'}/$module_file" |
|
95
|
0 |
2 |
unless close $wfh |
|
100
|
0 |
6 |
if (not $self->{'lib'}) { } |
|
109
|
6 |
11 |
if (not exists $self->{'lib'} && -d $self->{'lib'}) |
|
110
|
2 |
4 |
exists $self->{'keep'} ? : |
|
112
|
3 |
3 |
if $self->{'verbose'} |
|
120
|
20 |
0 |
if ($name =~ /\A\w+(?:::\w+)*\z/) { } |
|
126
|
5 |
15 |
if exists $INC{$name_pm} |