Branch Coverage

blib/lib/Hash/Dirty.pm
Criterion Covered Total %
branch 8 18 44.4


line true false branch
148 2 0 wantarray ? :
178 0 9 if (@_) { }
180 0 0 if exists $$self[1]{$key}
184 4 5 if $self->dirty_keys
213 1 0 wantarray ? :
219 0 0 wantarray ? :
233 1 0 wantarray ? :
266 5 1 if defined $old ^ defined $new or defined $old and $old ne $new
306 0 0 if exists $$storage{$key}