| line | % | coverage | branch |
|---|
| 293 | 100 | T | F | if @_ == 1 and ref $_[0] eq $T_HASH |
| 298 | 100 | T | F | if ($default_ref and $default_ref ne $T_ARRAY) |
| 306 | 100 | T | F | if ($default_ref eq $T_ARRAY) |
| 308 | 100 | T | F | if @_ == 1 and ref $_[0] eq $T_HASH |
| 316 | 100 | T | F | if (@_ == 1 and ref $_[0] eq $T_ARRAY) { } |
| 320 | 100 | T | F | if ($default and @{$_[0];} == 2 and $_[0][0] eq $default and not ref $_[0][1]) |
| 332 | 100 | T | F | if ($num_args == 0) |
| 333 | 100 | T | F | if (defined $default) |
| 342 | 100 | T | F | if ($num_args == 1) |
| 343 | 100 | T | F | if (defined $default) |
| 349 | 100 | T | F | if $kind eq $T_SCALAR |
| 356 | 100 | T | F | if not $kind or $kind eq $T_ARRAY or $kind eq $T_CODE or &Scalar::Util::blessed($arg) |
| 361 | 100 | T | F | unless defined $args->[0] |
| 367 | 100 | T | F | if ref $val eq $T_REF |
| 369 | 100 | T | F | if ref $val eq $T_HASH |
| 372 | 100 | T | F | if (ref $val eq $T_ARRAY and @{$val;} == 0) |
| 381 | 100 | T | F | if ($num_args == 2 and ref $args->[1] eq $T_HASH) |
| 382 | 100 | T | F | if (defined $default) |
| 383 | 100 | T | F | if (scalar keys %{$$args[1];}) |
| 385 | 100 | T | F | if $args->[0] eq $default |
| 395 | 100 | T | F | if $from_arrayref and defined $default |
| 398 | 100 | T | F | if ($num_args % 2 == 0) |