line |
true |
false |
branch |
134
|
14 |
34 |
if (defined $basetype and $type ne $basetype) |
139
|
37 |
11 |
if (defined $arg) { } |
141
|
10 |
27 |
unless (defined $basetype) |
142
|
6 |
4 |
if (&looks_like_number($arg)) { } |
153
|
4 |
44 |
wantarray ? : |
214
|
14 |
0 |
if ($policy ne 'silent') |
216
|
4 |
10 |
if (defined $_[0] and defined $_[1]) |
217
|
3 |
1 |
unless ($meta1->[0] eq $meta2->[0]) |
218
|
3 |
0 |
if $policy eq 'error' |
219
|
0 |
0 |
if $policy eq 'warn' |
221
|
1 |
0 |
unless ($meta1->[1] eq $meta2->[1]) |
222
|
1 |
0 |
if $policy eq 'error' |
223
|
0 |
0 |
if $policy eq 'warn' |
232
|
0 |
10 |
unless (defined $type) |
233
|
0 |
0 |
wantarray ? : |
236
|
3 |
7 |
if ($type eq ':NUMBER:') { } |
|
1 |
6 |
elsif ($type eq ':STRING:') { } |
244
|
2 |
4 |
if ($type eq 'ARRAY') { } |
|
4 |
0 |
elsif ($type eq 'HASH') { } |
|
0 |
0 |
elsif ($type eq 'SCALAR') { } |
256
|
2 |
8 |
if (defined $defval and defined $class) |
260
|
1 |
9 |
if ($do_qualify) |
261
|
1 |
0 |
unless defined $_[0] |
262
|
0 |
1 |
unless defined $_[1] |
265
|
9 |
1 |
wantarray ? : |