line |
true |
false |
branch |
99
|
0 |
4 |
$ENV{'MAKETEXT_FROM_STRINGS_DEBUG'} ? : |
125
|
1 |
1 |
if $caller->isa('Locale::Maketext::From::Strings') |
168
|
2 |
0 |
@_ > 1 ? : |
|
2 |
2 |
@_ ? : |
193
|
0 |
1 |
unless (ref $self) |
194
|
0 |
0 |
!ref($_[0]) ? : |
|
0 |
0 |
@_ > 1 ? : |
|
0 |
0 |
@_ ? : |
201
|
1 |
0 |
unless -s $namespace_dir . '.pm' |
202
|
0 |
1 |
unless opendir my $DH, $path |
208
|
0 |
1 |
unless $language =~ s/\.strings$// |
260
|
1 |
1 |
unless (ref $self) |
261
|
0 |
0 |
!ref($_[0]) ? : |
|
0 |
0 |
@_ > 1 ? : |
|
0 |
1 |
@_ ? : |
268
|
0 |
2 |
unless eval $self->_namespace_code |
270
|
0 |
2 |
unless opendir my $DH, $path |
274
|
0 |
2 |
unless $language =~ s/\.strings$// |
276
|
0 |
2 |
unless eval $self->_package_code($language) |
298
|
0 |
4 |
unless open my $FH, "<:encoding($encoding)", $file |
303
|
16 |
56 |
if ($buf =~ s/"([^"]+)"\s*=\s*"([^"]+)(");//s) { } |
|
20 |
36 |
elsif ($buf =~ s[^//(.*)$][]m) { } |
|
4 |
32 |
elsif ($buf =~ s[/\*(.*)\*/][]s) { } |
330
|
0 |
4 |
if (@_ and $_[0] eq 'generate') |
342
|
1 |
3 |
if -d $dir |
343
|
0 |
3 |
unless mkdir $dir |
351
|
0 |
3 |
if (eval "require $namespace; 1") |
378
|
0 |
2 |
unless open my $FH, '>', $path |
379
|
0 |
2 |
unless defined syswrite($FH, $content) |