blib/lib/Parse/SSA.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 9 | 14 | 64.2 |
line | true | false | branch |
---|---|---|---|
50 | 0 | 1 | unless open ASSFILE, '<', $filename |
54 | 40 | 16 | if (/^Dialogue:/) { } |
1 | 15 | elsif (/^(Title:|Original)/) { } | |
92 | 40 | 0 | if ($content =~ /Dialogue: [^,]*,([^,]*),([^,]*),([^,]*),([^,]*),[^,]*,[^,]*,[^,]*,[^,]*,(.*)$/) |
104 | 40 | 0 | if ($begin =~ /^\d{1}:/) |
108 | 40 | 0 | if ($end =~ /^\d{1}:/) |
116 | 0 | 40 | if ($isComment eq 'comment') |