| blib/lib/X12/Parser/Cf.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 12 | 14 | 85.7 |
| line | true | false | branch |
|---|---|---|---|
| 41 | 0 | 6 | unless open FILE, $params{'file'} |
| 54 | 6 | 56 | if (not $$self{'_LINES'}[$i] =~ /^[a-zA-Z0-9#]/) { } |
| 68 | 131 | 19491 | if ($$self{'_LINES'}[$i] =~ /^\[$loop\]/) |
| 81 | 125 | 0 | if ($$self{'_LINES'}[$pos] =~ /^segment=/) |
| 88 | 674 | 194 | if ($$self{'_LINES'}[$i] =~ /^segment=/) |
| 91 | 69 | 125 | if ($$self{'_LINES'}[$i] =~ /^loop=/) |
| 95 | 125 | 69 | unless ($$self{'_LINES'}[$i] =~ /^[a-zA-Z0-9#]/) |