Branch Coverage

lib/Filter/QuasiQuote.pm
Criterion Covered Total %
branch 29 36 80.5


line true false branch
38 111 4 if ($status > 0)
45 98 237 if (/\G\s+/cg)
46 51 284 if (/\G\[:(\w+)\|(.*?)\|\]/cg) { }
16 268 elsif (/\G\[:(\w+)\|(.*)/cg) { }
16 252 elsif (/\G\|\]/cg) { }
157 95 elsif (/\G[^\|\[]+|\G./cg) { }
52 0 51 if (defined $$self{'method'})
58 40 11 if ($self->can($meth))
75 4 12 unless ($self->can($meth))
88 12 0 if (not defined $$self{'method'}) { }
101 4 12 if ($$self{'ignore_once'})
102 0 4 if $$self{'method'}
110 0 12 unless (defined $meth)
118 0 12 if (not $pos) { }
139 6 105 if (not $changed and defined $$self{'method'})
145 52 63 if $changed
147 115 0 unless substr($_, -1, 1) eq "\n"
154 0 407 if $Debug