blib/lib/Smart/Args/TypeTiny.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 23 | 28 | 82.1 |
line | true | false | branch |
---|---|---|---|
25 | 48 | 0 | if (@_) |
27 | 10 | 38 | if ($is_invocant{$name}) |
30 | 3 | 7 | if (defined $_[1]) |
39 | 1 | 46 | @DB::args == 1 && ref $DB::args[0] eq 'HASH' ? : |
48 | 0 | 62 | unless my $name = var_name(1, \$_[$i]) |
53 | 55 | 7 | if (defined $_[$i + 1]) { } |
60 | 1 | 6 | unless (exists $args->{$name}) |
82 | 28 | 0 | if (@_) |
84 | 7 | 21 | if ($is_invocant{$name}) |
87 | 2 | 5 | if (defined $_[1]) |
103 | 0 | 38 | unless my $name = var_name(1, \$_[$i]) |
108 | 33 | 5 | if (defined $_[$i + 1]) { } |
115 | 0 | 5 | unless (@$args > 0) |
122 | 2 | 17 | if (@$args) |