| line |
true |
false |
branch |
|
16
|
0 |
3 |
unless ($sub) |
|
41
|
10 |
28 |
if grep {$_ =~ /^$abs_inc$/;} @compiled_inc |
|
42
|
17 |
11 |
if grep {$_ =~ /^$abs_inc$/;} @perl5lib |
|
43
|
0 |
11 |
if ('File::Spec'->splitdir($inc))[-1] eq $UR::Util::Config{'archname'} |
|
47
|
1 |
8 |
$ENV{'PERL_USED_ABOVE'} ? : |
|
88
|
266 |
2926 |
if ($var_name =~ /_stem$/ and $UR::Util::Config{$var_name}) { } |
|
92
|
1064 |
1862 |
if $UR::Util::Config{$var_name} |
|
97
|
266 |
0 |
if ${^TAINT} == 0 |
|
115
|
0 |
0 |
if (exists $value_pos{$value}) |
|
148
|
59 |
40 |
unless @_ |
|
152
|
0 |
40 |
unless ref $first_values and ref $first_values eq 'ARRAY' |
|
174
|
532 |
2394 |
if (defined $opts{'value'}) { } |
|
177
|
532 |
0 |
$refval ? : |
|
195
|
532 |
2394 |
if ($retval eq 'ARRAY') { } |
|
196
|
266 |
266 |
if ($opts{'access'} eq 'rw') |
|
205
|
532 |
1862 |
if ($opts{'access'} eq 'rw') |
|
219
|
0 |
0 |
unless defined $self->{'call_stack'} |
|
|
0 |
13 |
unless defined $self->{'desc'} |
|
|
0 |
13 |
if @_ |
|
|
0 |
0 |
unless defined $self->{'level'} |
|
|
0 |
0 |
unless defined $self->{'owner_class'} |
|
|
0 |
0 |
unless defined $self->{'owner_id'} |
|
|
0 |
0 |
unless defined $self->{'package_name'} |
|
|
0 |
154 |
unless defined $self->{'properties'} |
|
|
0 |
154 |
if @_ |
|
|
0 |
0 |
unless defined $self->{'text'} |
|
|
0 |
0 |
unless defined $self->{'time_stamp'} |
|
|
0 |
43 |
unless defined $self->{'type'} |
|
|
0 |
43 |
if @_ |
|
|
0 |
19 |
unless defined $self->{'type'} |
|
220
|
0 |
2926 |
if ($@) |
|
262
|
1 |
69 |
unless length $rel_path |
|
301
|
0 |
798 |
if $pkg->can($property) |
|
393
|
0 |
2128 |
if $pkg->can($property) |
|
427
|
1 |
1234 |
unless (ref $it) |
|
428
|
1 |
0 |
if ($it->isa('UR::Singleton')) { } |
|
464
|
0 |
0 |
if (not $ENV{'UR_NR_CPU'} or $ENV{'UR_NR_CPU'} < 2) |
|
485
|
0 |
0 |
if ($ENV{'UR_NR_CPU'}) { } |
|
501
|
0 |
0 |
unless ($pipe) |
|
509
|
0 |
0 |
if ($pid) { } |
|
|
0 |
0 |
elsif (defined $pid) { } |
|
517
|
0 |
0 |
if $last > $#things_to_check |
|
522
|
0 |
0 |
if (&$subref($things_to_check[$i])) |
|
546
|
0 |
0 |
unless $match_idx |
|
578
|
0 |
1 |
if (ref($_[0]) =~ /HASH/) { } |
|
587
|
1 |
0 |
defined $val ? : |
|
605
|
120 |
1 |
if ($monly{$v}) { } |
|
653
|
181 |
6412 |
if ($comparison_operator and $comparison_operator =~ /^(\!|not)\s*(.*)/) |
|
658
|
3930 |
2663 |
if (not defined $comparison_operator or $comparison_operator eq '') |
|
663
|
181 |
6412 |
if ($not) { } |
|
665
|
109 |
72 |
unless ($suffix) |
|
681
|
10 |
180 |
unless defined $str |
|
711
|
38539 |
81734 |
unless my $coderef = eval {
do {
*$glob{'CODE'}
}
} |
|
724
|
1034 |
48586 |
if ($new_class->{$key}) { } |
|
725
|
16 |
1018 |
if (not ref $new_class->{$key}) { } |
|
|
0 |
1018 |
elsif (ref $new_class->{$key} ne 'ARRAY') { } |