| line |
true |
false |
branch |
|
66
|
0 |
93 |
unless defined $reqs and 'ARRAY' eq ref $reqs |
|
72
|
0 |
93 |
if @notvalid |
|
110
|
0 |
95 |
if @notvalid |
|
122
|
78 |
112 |
if (exists $req->{$what} and defined $req->{$what}) |
|
128
|
34 |
44 |
if ('ARRAY' eq $ref) { } |
|
|
44 |
0 |
elsif ('Regexp' eq $ref or 'CODE' eq $ref or not $ref) { } |
|
150
|
0 |
4 |
unless defined $match and not $ref or 'Regexp' eq $ref or 'CODE' eq $ref |
|
155
|
1 |
80 |
if (not $ref and $match eq '-') |
|
161
|
1 |
79 |
if (not $ref and $match eq '--') |
|
167
|
0 |
79 |
if (not $ref and $match eq '+') |
|
182
|
17 |
78 |
if (defined $req->{'colre'}) |
|
186
|
17 |
0 |
if ('ARRAY' eq ref $req->{'colre'}) { } |
|
|
0 |
0 |
elsif (not ref $req->{'colre'}) { } |
|
204
|
0 |
17 |
unless not $ref or 'Regexp' eq $ref |
|
206
|
1 |
16 |
'Regexp' eq $ref ? : |
|
213
|
0 |
95 |
unless $req_id |
|
218
|
6 |
89 |
if exists $req->{'obj'} |
|
221
|
7 |
88 |
if exists $req->{'class'} |
|
225
|
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}) { } |
|
232
|
36 |
42 |
exists $req{'obj'} ? : |
|
234
|
2 |
76 |
if (exists $req->{$method}) { } |
|
236
|
0 |
2 |
if (defined $req->{$method}) |
|
240
|
0 |
0 |
if ref $req->{$method} |
|
246
|
0 |
0 |
if exists $req->{'obj'} and not $req->{'obj'}->can($call) or not UNIVERSAL::can($thing, $call) |
|
255
|
63 |
13 |
if UNIVERSAL::can($thing, $method) |
|
267
|
0 |
95 |
if exists $req{'class'} and not exists $req{'new'} |
|
271
|
73 |
22 |
exists $req->{'udata'} ? : |
|
296
|
123 |
214 |
if ($state) { } |
|
322
|
0 |
53261 |
if $Verbose |
|
325
|
122 |
53139 |
if ('table' eq $tagname) { } |
|
344
|
0 |
9954 |
if $Verbose |
|
347
|
123 |
9831 |
if ('table' eq $tagname) { } |
|
371
|
0 |
122 |
if $Verbose |
|
387
|
0 |
123 |
if $Verbose |
|
398
|
1 |
122 |
if 0 == @{$self->{'Tables'};} |