Branch Coverage

blib/lib/Bio/Metabolic/Substrate/Cluster.pm
Criterion Covered Total %
branch 16 24 66.6


line true false branch
161 1 20 if (ref $proto eq 'Bio::Metabolic::Substrate::Cluster') { }
165 1 19 ref $_[0] eq 'ARRAY' ? :
180 0 22 if ref $pkg
192 0 139 if @_
216 34 48 wantarray ? :
260 0 25 ref $_[0] eq 'ARRAY' ? :
265 2 45 if $cluster->has($substrate)
291 0 1 ref $_[0] eq 'ARRAY' ? :
295 0 2 unless $cluster->has($substrate)
301 3 0 if $v > $rempos
326 1 0 if ref $clusters[@clusters - 1] ne ref $clusters[0]
329 0 1 if @clusters == 0