Branch Coverage

web/cgi-bin/yatt.lib/YATT/Class/Configurable.pm
Criterion Covered Total %
branch 22 34 64.7


line true false branch
15 5254 1038 if (@_) { }
27 1909 3345 if (my(@member) = $self->initargs)
30 5237 17 if (@_) { }
62 0 2092 unless exists $$fields{"cf_$cf"}
69 0 0 if (exists $$self{"cf_$_"}) { }
83 0 0 if (/^cf_(.*)/) { }
94 0 35 unless exists $$fields{"cf_$name"}
100 775 6355 unless (@_)
103 4841 1417 if (/^cf_(.*)/) { }
110 0 6355 if (@_ == 1)
111 0 0 unless exists $$fields{"cf_$_[0]"}
114 0 6355 if (@_ % 2)
120 0 20863 unless defined $name
121 139 20724 if (my $sub = $self->can("configure_$name")) { }
124 0 20724 unless exists $$fields{"cf_$name"}
139 17975 16562 if defined $self->{$cf}
143 15886 676 unless my $sub = $self->can("default_$cf")