line |
true |
false |
branch |
26
|
0 |
2 |
if ($_pid == $$)
|
61
|
0 |
11 |
unless (exists $arg_for->{'dirs'} or exists $arg_for->{'tests'})
|
64
|
0 |
17 |
if (exists $arg_for->{'tests'} and 'ARRAY' ne ref $arg_for->{'tests'})
|
70
|
15 |
2 |
unless exists $arg_for->{'test_nowarnings'}
|
71
|
15 |
2 |
unless exists $arg_for->{'set_filenames'}
|
72
|
12 |
5 |
unless exists $arg_for->{'findbin'}
|
74
|
6 |
11 |
if (defined $dirs) { }
|
75
|
4 |
2 |
if 'ARRAY' ne ref $dirs
|
82
|
1 |
16 |
if ($arg_for->{'matching'})
|
84
|
0 |
1 |
unless ('Regexp' eq ref $matching)
|
91
|
14 |
54 |
if (my $ref = $arg_for->{$attribute})
|
92
|
0 |
14 |
if ('CODE' ne ref $ref) { }
|
109
|
0 |
17 |
if (delete $arg_for->{'check_plan'})
|
129
|
0 |
17 |
if (my(@keys) = keys %$arg_for)
|
134
|
8 |
9 |
if ($has_code_attributes)
|
136
|
0 |
8 |
if (my $error = $@)
|
138
|
0 |
0 |
if (my $dump = $self->_dump)
|
153
|
15 |
0 |
unless (shift())->{'dump'}
|
170
|
32 |
23 |
$self->{'verbose'} ? :
|
181
|
6 |
11 |
if ($self->_dirs)
|
185
|
50 |
16 |
if /\.t\z/ and /$matching/
|
191
|
3 |
14 |
if ($self->_should_shuffle) { }
|