line |
true |
false |
branch |
22
|
6 |
2 |
if (defined $plan)
|
24
|
0 |
6 |
unless $plan =~ /\d/
|
45
|
1 |
24 |
if (&any(sub {
|
50
|
0 |
30 |
unless ($tag =~ /^\w+$/)
|
58
|
0 |
2 |
if (exists $BY_METHOD{'tags'}{$method} and exists $BY_METHOD{'tags'}{$method}{$test_class})
|
85
|
0 |
2 |
unless defined $test_class
|
86
|
0 |
2 |
unless defined $tag
|
91
|
21 |
24 |
unless $method =~ /test_/
|
92
|
1 |
23 |
if $class->method_has_tag($test_class, $method, $tag)
|
100
|
0 |
426 |
unless defined $test_class
|
101
|
0 |
426 |
unless defined $method
|
102
|
0 |
426 |
unless defined $tag
|
105
|
323 |
103 |
unless exists $BY_METHOD{'tags'}{$method}
|
107
|
4 |
99 |
unless (exists $BY_METHOD{'tags'}{$method}{$test_class})
|
121
|
0 |
5 |
unless defined $test_class
|
122
|
0 |
5 |
unless defined $method
|
124
|
0 |
5 |
unless exists $BY_METHOD{'tags'}{$method}
|
129
|
5 |
0 |
if $test_class_meta->can('find_next_method_by_name')
|
132
|
1 |
4 |
unless ($method_meta)
|
138
|
1 |
0 |
if ($orig and $mm->package_name ne $orig->package_name)
|
144
|
0 |
5 |
unless $method_meta
|
147
|
5 |
0 |
if (exists $BY_METHOD{'tags'}{$method}{$super_test_class})
|
163
|
0 |
1 |
unless defined $test_class
|
164
|
0 |
1 |
unless defined $method
|
172
|
1 |
1 |
if ($direction eq '+') { }
|
|
1 |
0 |
elsif ($direction eq '-') { }
|