blib/lib/Test/Stream/HashBase.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 13 | 16 | 81.2 |
line | true | false | branch |
---|---|---|---|
26 | 0 | 2554 | unless $META{$_} |
2554 | 1404 | if (my(@bmetas) = map({() unless $META{$_};} @$isa)) | |
30 | 4 | 3954 | if (my $base = $args{'base'}) |
34 | 1 | 0 | unless ($into->isa($base)) |
52 | 0 | 3955 | unless eval "${eval}1;" |
54 | 95 | 3860 | if $args{'no_new'} |
63 | 17091 | 1 | if $self->can('init') |
72 | 52 | 116 | if @_ |