inc/Test/Mock/Guard.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 7 | 35 | 20.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
24 | 0 | 0 | 3 | @args and @args % 2 == 0 |
29 | 0 | 0 | 3 | defined $class_name and ref $method_defs eq 'HASH' |
86 | 0 | 0 | 0 | @args and @args % 2 == 0 |
89 | 0 | 0 | 0 | defined $class_name and ref $methods eq 'ARRAY' |
191 | 0 | 0 | 0 | exists $$mocked{$klass}{$refaddr} and exists $$mocked{$klass}{$refaddr}{$method} |
208 | 0 | 0 | 0 | exists $$mocked{$klass}{$refaddr} and exists $$mocked{$klass}{$refaddr}{$method} |
line | l | !l | condition |
---|---|---|---|
42 | 0 | 3 | $$stash{$class_name} ||= {} |
72 | 0 | 0 | $$self{'object'}{"$class_name#$refaddr"} || (return undef) |
94 | 0 | 0 | $$self{'object'}{"$klass#$refaddr"} || (next) |
105 | 0 | 8 | $$stash{$class_name}{$method_name} ||= {'counter', 0, 'restore', {}, 'delete_flags', {}, 'called_count', 0} |
119 | 8 | 0 | delete $$self{'restore'}{$class_name}{$method_name} || (return) |
121 | 8 | 0 | max(keys %{$$stuff{'restore'};}) || 0 |
167 | 0 | 0 | $$mocked{$klass}{'_mocked'} ||= {} |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
141 | 8 | 0 | 0 | $orig_method || *{"${class_name}::$method_name is unregistered";} |