| line |
true |
false |
branch |
|
47
|
0 |
93 |
unless defined $reqs and 'ARRAY' eq ref $reqs |
|
53
|
0 |
93 |
if @notvalid |
|
91
|
0 |
95 |
if @notvalid |
|
103
|
78 |
112 |
if (exists $req->{$what} and defined $req->{$what}) |
|
109
|
34 |
44 |
if ('ARRAY' eq $ref) { } |
|
|
44 |
0 |
elsif ('Regexp' eq $ref or 'CODE' eq $ref or not $ref) { } |
|
131
|
0 |
4 |
unless defined $match and not $ref or 'Regexp' eq $ref or 'CODE' eq $ref |
|
136
|
1 |
80 |
if (not $ref and $match eq '-') |
|
142
|
1 |
79 |
if (not $ref and $match eq '--') |
|
148
|
0 |
79 |
if (not $ref and $match eq '+') |
|
163
|
17 |
78 |
if (defined $req->{'colre'}) |
|
167
|
17 |
0 |
if ('ARRAY' eq ref $req->{'colre'}) { } |
|
|
0 |
0 |
elsif (not ref $req->{'colre'}) { } |
|
185
|
0 |
17 |
unless not $ref or 'Regexp' eq $ref |
|
187
|
1 |
16 |
'Regexp' eq $ref ? : |
|
194
|
0 |
95 |
unless $req_id |
|
199
|
6 |
89 |
if exists $req->{'obj'} |
|
202
|
7 |
88 |
if exists $req->{'class'} |
|
206
|
310 |
260 |
if (exists $req->{$method} and 'CODE' eq ref $req->{$method}) { } |
|
|
78 |
182 |
elsif (exists $req{'obj'} or exists $req{'class'}) { } |
|
|
0 |
182 |
elsif (exists $req->{$method}) { } |
|
213
|
36 |
42 |
exists $req{'obj'} ? : |
|
215
|
2 |
76 |
if (exists $req->{$method}) { } |
|
217
|
0 |
2 |
if (defined $req->{$method}) |
|
221
|
0 |
0 |
if ref $req->{$method} |
|
227
|
0 |
0 |
if exists $req->{'obj'} and not $req->{'obj'}->can($call) or not UNIVERSAL::can($thing, $call) |
|
236
|
63 |
13 |
if UNIVERSAL::can($thing, $method) |
|
248
|
0 |
95 |
if exists $req{'class'} and not exists $req{'new'} |
|
252
|
73 |
22 |
exists $req->{'udata'} ? : |
|
277
|
123 |
214 |
if ($state) { } |
|
303
|
0 |
53261 |
if $Verbose |
|
306
|
122 |
53139 |
if ('table' eq $tagname) { } |
|
325
|
0 |
9954 |
if $Verbose |
|
328
|
123 |
9831 |
if ('table' eq $tagname) { } |
|
350
|
0 |
122 |
if $Verbose |
|
366
|
0 |
123 |
if $Verbose |
|
377
|
1 |
122 |
if 0 == @{$self->{'Tables'};} |