| line |
true |
false |
branch |
|
292
|
2 |
0 |
unless ref $clone eq ref $self |
|
317
|
2 |
7 |
if (defined $new_value) |
|
338
|
2 |
7 |
if (defined $new_value) |
|
359
|
2 |
7 |
if (defined $new_value) |
|
380
|
33 |
9 |
if (defined $new_value) |
|
382
|
15 |
18 |
ref $new_value eq 'ARRAY' ? : |
|
401
|
17 |
24 |
ref $chg_vec eq 'ARRAY' ? : |
|
462
|
2 |
1 |
unless $tra and $tra = $$self{$KEY_VIR_PATH_DELI} |
|
480
|
2 |
1 |
unless $tra and $tra = $$self{$KEY_PHYSICAL_DELI} |
|
499
|
2 |
2 |
unless $tra and $tra = $$self{$KEY_VIR_PATH_DELI} |
|
518
|
2 |
2 |
unless $tra and $tra = $$self{$KEY_PHYSICAL_DELI} |
|
540
|
2 |
4 |
if (defined $new_value) |
|
562
|
3 |
9 |
if (defined $new_value) |
|
619
|
1 |
5 |
if (defined $new_value) |
|
676
|
15 |
26 |
@{$chg;} && $$chg[0] eq '' ? : |
|
696
|
74 |
0 |
$in[0] eq '' ? : |
|
699
|
90 |
72 |
if $part =~ /[a-zA-Z0-9]/ and push @mid, $part |
|
700
|
39 |
33 |
if $part ne '..' |
|
701
|
17 |
16 |
@mid ? : |
|
704
|
74 |
0 |
if $out[0] eq '' |