Branch Coverage

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


line true false branch
15 5266 1038 if (@_) { }
27 1909 3357 if (my(@member) = $self->initargs)
30 5249 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 6367 unless (@_)
103 4841 1417 if (/^cf_(.*)/) { }
110 0 6367 if (@_ == 1)
111 0 0 unless exists $$fields{"cf_$_[0]"}
114 0 6367 if (@_ % 2)
120 0 20923 unless defined $name
121 139 20784 if (my $sub = $self->can("configure_$name")) { }
124 0 20784 unless exists $$fields{"cf_$name"}
139 18023 16646 if defined $self->{$cf}
143 15970 676 unless my $sub = $self->can("default_$cf")