| line |
true |
false |
branch |
|
31
|
0 |
2 |
unless $self->{'LRLP_charset'} = $args->{'charset'} |
|
35
|
0 |
2 |
unless my $domain = $args->{'textdomain'} |
|
38
|
2 |
0 |
unless ($forms) |
|
49
|
2 |
0 |
defined $version ? : |
|
62
|
0 |
2 |
unless my $charset = $self->{'LRLP_charset'} = $args{'charset'} |
|
64
|
0 |
2 |
unless open my $fh, "<:encoding($charset):crlf", $fn |
|
73
|
1 |
19 |
unless defined $block |
|
78
|
1 |
18 |
unless length $block |
|
81
|
18 |
0 |
if $po |
|
84
|
0 |
2 |
unless close $fh |
|
95
|
1 |
1 |
@_ % 2 ? : |
|
98
|
0 |
2 |
unless defined $file |
|
105
|
1 |
1 |
if (ref $file) { } |
|
108
|
0 |
1 |
unless open $fh, $layers, $file |
|
116
|
2 |
13 |
if $msgid eq '' |
|
120
|
13 |
0 |
&blessed($rec) ? : |
|
123
|
0 |
13 |
if $po->useless |
|
124
|
0 |
13 |
if $need_refs and not $po->references |
|
130
|
0 |
2 |
unless $fh->close |
|
142
|
0 |
0 |
(shift())->filename =~ m([/\\](\w+)[^/\\]*$) ? : |
|
148
|
13 |
35 |
unless my $msgs = $self->index->{$msgid} |
|
150
|
35 |
0 |
if &blessed($msgs) and !$msgctxt || $msgctxt eq $msgs->msgctxt |
|
160
|
0 |
15 |
unless my $po = $self->msgid($msgid, $msgctxt) |
|
174
|
31 |
0 |
unless $h |
|
176
|
0 |
0 |
if &blessed($h) |
|
182
|
0 |
0 |
if $h->{$ctxt} |
|
191
|
27 |
0 |
&blessed($_) ? : |
|
|
3 |
1 |
unless @_ |
|
193
|
0 |
1 |
if $_[0] ne 'ACTIVE' |
|
204
|
0 |
12 |
unless my $header = $self->msgid('') |
|
208
|
7 |
5 |
unless (@_) |
|
210
|
7 |
0 |
$text =~ /^\Q$field\E\:\s*([^\n]*?)\;?\s*$/im ? : |
|
217
|
4 |
1 |
if (defined $content) { } |
|
218
|
1 |
3 |
unless s/^\Q$field\E\:([^\n]*)/${field}: $content/im |
|
260
|
2 |
0 |
if $header |
|
283
|
0 |
0 |
if $po->msgid eq '' |
|
285
|
0 |
0 |
if $po->fuzzy |
|
286
|
0 |
0 |
unless $po->isActive or $po->useless |