| blib/lib/XML/TMX/Writer.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 15 | 26 | 57.6 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 19 | 5 | 0 | 0 | exists $ops{'-encoding'} and not $ops{'-encoding'} =~ /utf.?8/i |
| 48 | 5 | 0 | 0 | defined $options{'SEGTYPE'} and grep {$_ eq $options{'SEGTYPE'};} @valid_segtype |
| line | l | !l | condition |
|---|---|---|---|
| 34 | 4 | 1 | $options{'encoding'} || 'UTF-8' |
| 54 | 0 | 5 | $options{'tool'} || 'XML::TMX::Writer' |
| 56 | 0 | 5 | $options{'srctmf'} || 'plain text' |
| 57 | 4 | 1 | $options{'adminlang'} || 'en' |
| 58 | 4 | 1 | $options{'srclang'} || 'en' |
| 59 | 4 | 1 | $options{'datatype'} || 'plaintext' |
| 170 | 41 | 0 | $tuv{$lang}{'-seg'} || '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 16 | 0 | 5 | 0 | ref $proto || $proto |
| 55 | 0 | 5 | 0 | $options{'toolversion'} || $XML::TMX::Writer::VERSION |