Branch Coverage

blib/lib/Business/UDC/Tokenizer.pm
Criterion Covered Total %
branch 32 34 94.1


line true false branch
27 5 319 if ($input =~ m[\G( +(?=\p{L})\p{L}(?:[\p{L}\p{N}._#,]|\+(?! )|/(?! )|-(?!\d)| +(?=[\p{L}\p{N}._]))* *)]cgu)
32 3 316 if ($input =~ /\G( +(?=($time_quote)(?:(?!$time_quote)[\s\S])*\p{L})(?:$time_quote)(?:(?!$time_quote)[\s\S])*$time_quote *)/cgu)
37 12 304 if ($input =~ /\G(\s+)/cg)
42 120 184 if ($input =~ /\G(\d+(?:[\.,]\d+)*)/cg)
47 9 175 if ($input =~ /\G(\.\d+(?:\.\d+)*)/cg)
52 4 171 if ($input =~ /\G(\[)/cg)
57 7 164 if ($input =~ /\G(\])/cg)
62 37 127 if ($input =~ m[\G([:+/])]cg)
67 22 105 if ($input =~ /\G(-\d+(?:\.\d+)*)/cg)
72 41 64 if ($input =~ /\G(\([^)]+\))/cg)
77 13 51 if ($input =~ /\G(($time_quote)(?:(?!$time_quote)[\s\S])*$time_quote)/cg)
79 0 13 if ($value =~ /\p{L}/u) { }
87 4 47 if ($input =~ /\G(=+(?:[A-Za-z]+|\d+(?:\.\d+)*))/cg)
92 19 28 if ($input =~ m[\G(\p{L}(?:[\p{L}\p{N}._#,]|\+(?! )|/(?! )|-(?!\d)| +(?=[\p{L}\p{N}._]))* *)]cgu)
99 25 3 if ($input =~ /\G((?:'|`|'|$a|$acute)\d+(?:\.\d+)*)/cg)
116 0 241 if ($value =~ /^(.*?)\s/s)
131 241 80 unless ($allow_whitespace)