Branch Coverage

blib/lib/Text/APL/Parser.pm
Criterion Covered Total %
branch 28 28 100.0


line true false branch
34 22 37 unless (defined $input)
35 12 10 unless defined $$self{'buffer'}
38 7 3 $buffer =~ /$LINE_TOKEN/msx ? :
44 2 35 if (defined $$self{'buffer'})
52 16 42 if ($input =~ /\G $TOKEN/cgmsx) { }
12 30 elsif ($input =~ /\G $LINE_TOKEN \n/cgmsx) { }
11 19 elsif ($input =~ /\G (.+?) (?=$TOKEN_START | $LINE_TOKEN_START)/cgmsx) { }
62 11 8 if ($input =~ /( (?:$TOKEN_START | $LINE_TOKEN_START) .* )/cgmsx) { }
1 7 elsif ($input =~ /( $LEFTOVER_TOKEN ) $/cgmsx) { }
71 7 12 if (defined $value and $value ne '')
86 12 4 defined $modifier ? :
87 3 13 if defined $modifier and length $modifier == 2
96 11 8 defined $modifier ? :
97 5 14 if defined $modifier and length $modifier == 2