Branch Coverage

blib/lib/HTTP/Headers/ETag.pm
Criterion Covered Total %
branch 29 30 96.6


line true false branch
19 8 6 if (@_)
22 1 13 wantarray ? :
33 3 4 if (@_)
35 1 2 if (not defined $new) { }
1 1 elsif ($new =~ /^\d+$/) { }
45 3 4 unless defined wantarray
48 2 1 if $t
50 1 3 wantarray ? :
72 11 18 if s[^\s*[wW]/][]
74 13 16 if (s/^\s*(\"[^\"\\]*(?:\\.[^\"\\]*)*\")//) { }
6 10 elsif (s/^\s*,//) { }
8 2 elsif (s/^\s*([^,\s]+)//) { }
2 0 elsif (s/^\s+// or not length $_) { }
78 1 5 if $weak
86 1 1 if $weak