| line |
true |
false |
branch |
|
21
|
0 |
5 |
if exists $Pcore::Core::Env::Share::RESERVED_LIB_NAME->{$name}
|
|
23
|
0 |
5 |
if exists $self->_lib->{$name}
|
|
38
|
0 |
0 |
if ($ENV->is_par) { }
|
|
|
0 |
0 |
elsif ($lib_name eq 'temp') { }
|
|
47
|
0 |
0 |
if ($lib_name eq 'dist')
|
|
48
|
0 |
0 |
if (my $dist = $ENV->dist) { }
|
|
56
|
0 |
0 |
unless exists $libs->{$lib_name}
|
|
68
|
0 |
5 |
if ($lib_name) { }
|
|
71
|
0 |
0 |
unless $lib_path
|
|
76
|
0 |
0 |
unless (exists $$lib_storage{$lib_name}{$storage_name})
|
|
77
|
0 |
0 |
if (-d "$lib_path$storage_name") { }
|
|
92
|
4 |
1 |
unless (exists $storage->{$storage_name})
|
|
96
|
4 |
0 |
if -d $storage_path
|
|
99
|
0 |
4 |
unless exists $storage->{$storage_name}
|
|
115
|
5 |
0 |
if (not $args{'storage'}) { }
|
|
116
|
5 |
0 |
if ($path =~ m[\A/?([^/]+)/(.+)]msu) { }
|
|
129
|
0 |
5 |
if ($args{'lib'}) { }
|
|
|
5 |
0 |
elsif (my $storage = $self->get_storage($args{'storage'})) { }
|
|
130
|
0 |
0 |
if (my $storage_path = $self->get_storage($args{'storage'}, $args{'lib'}))
|
|
133
|
0 |
0 |
if -f $res
|
|
140
|
5 |
0 |
if -f $res
|
|
155
|
0 |
0 |
unless $lib_path
|
|
158
|
0 |
0 |
if (not $args{'storage'}) { }
|
|
159
|
0 |
0 |
if ($path =~ m[\A/?([^/]+)/(.+)]msu) { }
|
|
173
|
0 |
0 |
unless (-d "$lib_path$args{'storage'}")
|
|
176
|
0 |
0 |
if exists $self->_lib_storage->{$lib_name}
|
|
180
|
0 |
0 |
unless -d "$lib_path$args{'storage'}@{[$path->dirname];}"
|
|
183
|
0 |
0 |
if (ref $file eq 'SCALAR') { }
|
|
|
0 |
0 |
elsif (XXX or XXX) { }
|