| blib/lib/Text/Tags/Parser.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 21 | 22 | 95.4 |
| line | true | false | branch |
|---|---|---|---|
| 15 | 1 | 54 | unless defined $string |
| 35 | 12 | 94 | unless length $tag |
| 42 | 88 | 6 | unless $seen{$tag}++ |
| 73 | 0 | 48 | unless length $tag |
| 77 | 6 | 42 | if ($tag =~ /"/ and $tag =~ /'/) { } |
| 6 | 36 | elsif ($tag =~ /"/) { } | |
| 4 | 32 | elsif ($tag =~ /'/) { } | |
| 17 | 15 | elsif ($tag =~ /[ ,]/ or $always_quote) { } | |
| 87 | 5 | 1 | if ($tag =~ / / or $tag =~ /,/ or $tag =~ /^"/ or $always_quote) { } |
| 96 | 3 | 1 | if ($tag =~ / / or $tag =~ /,/ or $tag =~ /^'/ or $always_quote) { } |
| 115 | 2 | 46 | if $seen{$tag}++ |