| line |
true |
false |
branch |
|
31
|
4 |
0 |
eval q[DateTime::TimeZone->new( name => 'local' );] ? :
|
|
98
|
0 |
0 |
if ($self->_is_a($_[0], 'Text::PO::Element')) { }
|
|
|
0 |
0 |
elsif (scalar @_ == 1 and ref $_[0] eq 'HASH') { }
|
|
|
0 |
0 |
elsif (not @_ % 2) { }
|
|
118
|
0 |
0 |
unless @_ % 2
|
|
122
|
0 |
0 |
unless length $id
|
|
127
|
0 |
0 |
ref $msgid ? :
|
|
128
|
0 |
0 |
if ($thisId eq $id)
|
|
165
|
0 |
8 |
if $e->is_meta or not length $e->msgid
|
|
166
|
1 |
7 |
ref $msgid ? :
|
|
169
|
1 |
7 |
if ($e->plural) { }
|
|
174
|
2 |
0 |
ref $msgstr->[$i] ? :
|
|
180
|
1 |
6 |
ref $msgstr ? :
|
|
188
|
1 |
7 |
if $e->plural and $e->msgid_plural
|
|
189
|
8 |
0 |
unless (scalar @{$ref->{'comment'} = $e->comment;})
|
|
193
|
8 |
0 |
unless (length($ref->{'context'} = $e->context))
|
|
197
|
8 |
0 |
unless (scalar @{$ref->{'flags'} = $e->flags;})
|
|
201
|
5 |
3 |
unless (length($ref->{'reference'} = $e->reference))
|
|
211
|
0 |
4 |
if exists $opts->{$t}
|
|
213
|
0 |
1 |
if exists $opts->{'sort'}
|
|
214
|
0 |
1 |
if ($INC{'threads.pm'} and not exists $INC{'forks.pm'})
|
|
219
|
0 |
0 |
if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
|
|
|
0 |
0 |
&$Nice::Try::TRY ? :
|
|
|
0 |
0 |
if scalar @Nice::Try::VOID
|
|
|
0 |
0 |
if ($Nice::Try::WANT eq 'OBJECT') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'CODE') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'HASH') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'ARRAY') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'GLOB') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'LIST') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'VOID') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'SCALAR') { }
|
|
|
0 |
0 |
if defined $Nice::Try::LAST_VAL
|
|
|
0 |
1 |
if ($Nice::Try::WANTARRAY) { }
|
|
|
1 |
0 |
elsif (defined $Nice::Try::WANTARRAY) { }
|
|
|
0 |
1 |
if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
|
|
|
0 |
1 |
length $@ ? :
|
|
|
1 |
0 |
unless &Scalar::Util::blessed($@)
|
|
|
0 |
0 |
if ($Nice::Try::HAS_CATCH)
|
|
|
0 |
1 |
if ($Nice::Try::DIED)
|
|
222
|
0 |
0 |
if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
|
|
|
0 |
0 |
&$Nice::Try::CATCH ? :
|
|
|
0 |
0 |
if scalar @Nice::Try::VOID
|
|
|
0 |
0 |
if ($Nice::Try::WANT eq 'OBJECT') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'CODE') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'HASH') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'ARRAY') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'GLOB') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'LIST') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'VOID') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'SCALAR') { }
|
|
|
0 |
0 |
if ($Nice::Try::WANTARRAY) { }
|
|
|
0 |
0 |
elsif (defined $Nice::Try::WANTARRAY) { }
|
|
|
0 |
0 |
if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
|
|
|
0 |
0 |
if $@
|
|
|
0 |
1 |
if (defined $Nice::Try::CATCH_DIED)
|
|
|
0 |
0 |
if (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__NEXT__') { }
|
|
|
0 |
0 |
elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__LAST__') { }
|
|
|
0 |
0 |
elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__REDO__') { }
|
|
|
0 |
0 |
elsif (defined $Nice::Try::BREAK and $Nice::Try::BREAK eq 'return') { }
|
|
|
0 |
0 |
if ($Nice::Try::WANT eq 'LIST') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'VOID') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'OBJECT') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'SCALAR') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'CODE') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'HASH') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'ARRAY') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'GLOB') { }
|
|
|
0 |
1 |
$Nice::Try::WANTARRAY ? :
|
|
|
0 |
1 |
if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
|
|
|
1 |
0 |
if (not defined $Nice::Try::BREAK or $Nice::Try::BREAK eq "return")
|
|
|
1 |
0 |
if (defined $Nice::Try::WANTARRAY || defined $Nice::Try::BREAK && $Nice::Try::BREAK eq 'return' and !&Scalar::Util::blessed($Nice::Try::RETVAL[0]) || &Scalar::Util::blessed($Nice::Try::RETVAL[0]) && !$Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL'))
|
|
|
0 |
0 |
if ($Nice::Try::BREAK eq 'next') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::BREAK eq 'last') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::BREAK eq 'redo') { }
|
|
|
0 |
0 |
if (defined $Nice::Try::BREAK)
|
|
|
0 |
0 |
scalar @Nice::Try::LAST_VAL > 1 ? :
|
|
230
|
0 |
2 |
if (@_)
|
|
247
|
2 |
0 |
unless exists $ENV{'LANGUAGE'} or exists $ENV{'LANG'}
|
|
248
|
0 |
0 |
$ENV{'LANGUAGE'} || $ENV{'LANG'} ? :
|
|
255
|
0 |
0 |
unless length $str
|
|
257
|
0 |
0 |
unless $enc
|
|
258
|
0 |
0 |
if ($INC{'threads.pm'} and not exists $INC{'forks.pm'})
|
|
260
|
0 |
0 |
if $enc eq "utf8"
|
|
263
|
0 |
0 |
if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
|
|
|
0 |
0 |
&$Nice::Try::TRY ? :
|
|
|
0 |
0 |
if scalar @Nice::Try::VOID
|
|
|
0 |
0 |
if ($Nice::Try::WANT eq 'OBJECT') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'CODE') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'HASH') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'ARRAY') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'GLOB') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'LIST') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'VOID') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'SCALAR') { }
|
|
|
0 |
0 |
if defined $Nice::Try::LAST_VAL
|
|
|
0 |
0 |
if ($Nice::Try::WANTARRAY) { }
|
|
|
0 |
0 |
elsif (defined $Nice::Try::WANTARRAY) { }
|
|
|
0 |
0 |
if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
|
|
|
0 |
0 |
length $@ ? :
|
|
|
0 |
0 |
unless &Scalar::Util::blessed($@)
|
|
|
0 |
0 |
if ($Nice::Try::HAS_CATCH)
|
|
|
0 |
0 |
if ($Nice::Try::DIED)
|
|
266
|
0 |
0 |
if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
|
|
|
0 |
0 |
&$Nice::Try::CATCH ? :
|
|
|
0 |
0 |
if scalar @Nice::Try::VOID
|
|
|
0 |
0 |
if ($Nice::Try::WANT eq 'OBJECT') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'CODE') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'HASH') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'ARRAY') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'GLOB') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'LIST') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'VOID') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'SCALAR') { }
|
|
|
0 |
0 |
if ($Nice::Try::WANTARRAY) { }
|
|
|
0 |
0 |
elsif (defined $Nice::Try::WANTARRAY) { }
|
|
|
0 |
0 |
if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
|
|
|
0 |
0 |
if $@
|
|
|
0 |
0 |
if (defined $Nice::Try::CATCH_DIED)
|
|
|
0 |
0 |
if (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__NEXT__') { }
|
|
|
0 |
0 |
elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__LAST__') { }
|
|
|
0 |
0 |
elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__REDO__') { }
|
|
|
0 |
0 |
elsif (defined $Nice::Try::BREAK and $Nice::Try::BREAK eq 'return') { }
|
|
|
0 |
0 |
if ($Nice::Try::WANT eq 'LIST') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'VOID') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'OBJECT') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'SCALAR') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'CODE') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'HASH') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'ARRAY') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'GLOB') { }
|
|
|
0 |
0 |
$Nice::Try::WANTARRAY ? :
|
|
|
0 |
0 |
if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
|
|
|
0 |
0 |
if (not defined $Nice::Try::BREAK or $Nice::Try::BREAK eq "return")
|
|
|
0 |
0 |
if (defined $Nice::Try::WANTARRAY || defined $Nice::Try::BREAK && $Nice::Try::BREAK eq 'return' and !&Scalar::Util::blessed($Nice::Try::RETVAL[0]) || &Scalar::Util::blessed($Nice::Try::RETVAL[0]) && !$Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL'))
|
|
|
0 |
0 |
if ($Nice::Try::BREAK eq 'next') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::BREAK eq 'last') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::BREAK eq 'redo') { }
|
|
|
0 |
0 |
if (defined $Nice::Try::BREAK)
|
|
|
0 |
0 |
scalar @Nice::Try::LAST_VAL > 1 ? :
|
|
275
|
1 |
0 |
if (@_) { }
|
|
278
|
0 |
1 |
unless &Scalar::Util::openhandle($fh)
|
|
286
|
0 |
1 |
if lc $enc eq "utf-8"
|
|
287
|
0 |
1 |
unless $fh->binmode(":$enc")
|
|
290
|
1 |
0 |
if (my $header = $self->header)
|
|
292
|
0 |
1 |
unless $fh->print(join("\n", @$header))
|
|
295
|
1 |
0 |
if (length $domain)
|
|
297
|
0 |
1 |
unless $fh->print(qq[\n#\n# domain "$domain"])
|
|
299
|
0 |
1 |
unless $fh->print("\n\n")
|
|
302
|
1 |
0 |
if (scalar @$metaKeys)
|
|
304
|
0 |
1 |
unless $fh->printf("msgid \"\"\n")
|
|
305
|
0 |
1 |
unless $fh->printf("msgstr \"\"\n")
|
|
310
|
0 |
11 |
if (not exists $self->{'meta'}{$k2} and length $Text::PO::DEF_META->{$k})
|
|
315
|
0 |
11 |
unless $fh->printf("\"%s: %s\\n\"\n", $self->normalise_meta($k), $self->meta($k))
|
|
317
|
0 |
1 |
unless $fh->print("\n")
|
|
321
|
0 |
8 |
if $e->is_meta or not length $e->msgid
|
|
322
|
0 |
8 |
if ($e->po ne $self)
|
|
324
|
0 |
0 |
if warnings::enabled()
|
|
326
|
0 |
8 |
unless $fh->print($e->dump, "\n")
|
|
327
|
0 |
8 |
unless $fh->print("\n")
|
|
340
|
0 |
1 |
unless $self->_is_a($elem, "Text::PO::Element")
|
|
345
|
0 |
1 |
unless length $elem->msgid
|
|
348
|
1 |
0 |
if ($opts->{'msgid_only'} and $e->msgid eq $elem->msgid or $e->msgid eq $elem->msgid and $e->msgstr eq $elem->msgstr)
|
|
351
|
0 |
1 |
if (length $elem->context) { }
|
|
353
|
0 |
0 |
if ($elem->context eq $e->context)
|
|
376
|
1 |
7 |
ref $msgid ? :
|
|
377
|
2 |
6 |
ref $msgstr ? :
|
|
402
|
54 |
5 |
if (@_)
|
|
404
|
4 |
50 |
if ($self->_is_hash($_[0])) { }
|
|
|
50 |
0 |
elsif (scalar @_ == 1) { }
|
|
|
0 |
0 |
elsif (not @_ % 2) { }
|
|
431
|
31 |
3 |
if (index($k, "-") != -1)
|
|
445
|
1 |
2 |
if (@_)
|
|
448
|
0 |
1 |
unless $self->_is_array($ref)
|
|
458
|
0 |
3 |
unless scalar @$data
|
|
475
|
9 |
0 |
if not $opts->{'encoding'} and $self->encoding
|
|
486
|
45 |
1 |
if (scalar @res)
|
|
499
|
0 |
3 |
if (&Scalar::Util::reftype($this) eq 'GLOB') { }
|
|
502
|
0 |
0 |
unless &Scalar::Util::openhandle($io)
|
|
522
|
13 |
2 |
if (/^\S+/) { }
|
|
|
0 |
4 |
elsif ($ignoring_leading_blanks and /^[[:blank:]\h]*$/) { }
|
|
531
|
3 |
12 |
unless /^\#+/
|
|
532
|
2 |
10 |
if (/^\#+[[:blank:]\h]*domain[[:blank:]]+\"([^\"]+)\"/) { }
|
|
547
|
2 |
1 |
if length $header
|
|
560
|
3 |
125 |
if (not $foundFirstLine and /^\S/)
|
|
564
|
21 |
107 |
if (/^[[:blank:]]*$/) { }
|
|
|
0 |
107 |
elsif (/^\#\.[[:blank:]]*(.*?)$/) { }
|
|
|
9 |
98 |
elsif (/^\#\:[[:blank:]]+(.*?)$/) { }
|
|
|
0 |
98 |
elsif (/^\#\,[[:blank:]]+(.*?)$/) { }
|
|
|
0 |
98 |
elsif (/^\#+[[:blank:]]+(.*?)$/) { }
|
|
|
22 |
76 |
elsif (/^msgid[[:blank:]]+"(.*?)"$/) { }
|
|
|
3 |
73 |
elsif (/^msgid_plural[[:blank:]]+"(.*?)"[[:blank:]]*$/) { }
|
|
|
2 |
71 |
elsif (/^msgctxt[[:blank:]]+"(.*?)"[[:blank:]]*$/) { }
|
|
|
20 |
51 |
elsif (/^msgstr[[:blank:]]+"(.*?)"[[:blank:]]*$/) { }
|
|
|
8 |
43 |
elsif (/^msgstr\[(\d+)\][[:blank:]]+"(.*?)"[[:blank:]]*$/) { }
|
|
|
43 |
0 |
elsif (/^[[:blank:]]*"(.*?)"[[:blank:]]*$/) { }
|
|
566
|
21 |
0 |
if ($foundFirstLine)
|
|
569
|
0 |
21 |
if (scalar @$elem > 1 and not length $e->msgid and length $e->msgstr and length $elem->[-1]->msgid and not length $elem->[-1]->msgstr) { }
|
|
579
|
0 |
21 |
if (++$$seen{$e->id} > 1)
|
|
587
|
18 |
3 |
if $self->encoding
|
|
591
|
3 |
18 |
if (scalar @$elem == 1)
|
|
601
|
33 |
0 |
if ($s =~ /^([^\x00-\x1f\x80-\xff :=]+):[[:blank:]]*(.*?)$/)
|
|
606
|
3 |
30 |
if ($k eq "content-type")
|
|
608
|
3 |
0 |
if ($v =~ /\bcharset=\s*([-\w]+)/i)
|
|
613
|
3 |
0 |
if lc $enc eq "utf-8"
|
|
615
|
0 |
3 |
if ($INC{'threads.pm'} and not exists $INC{'forks.pm'})
|
|
617
|
3 |
0 |
$enc eq 'utf8' ? :
|
|
619
|
2 |
0 |
if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
|
|
|
0 |
0 |
&$Nice::Try::TRY ? :
|
|
|
0 |
0 |
if scalar @Nice::Try::VOID
|
|
|
0 |
0 |
if ($Nice::Try::WANT eq 'OBJECT') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'CODE') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'HASH') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'ARRAY') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'GLOB') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'LIST') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'VOID') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'SCALAR') { }
|
|
|
0 |
2 |
if defined $Nice::Try::LAST_VAL
|
|
|
0 |
3 |
if ($Nice::Try::WANTARRAY) { }
|
|
|
1 |
2 |
elsif (defined $Nice::Try::WANTARRAY) { }
|
|
|
0 |
3 |
if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
|
|
|
0 |
3 |
length $@ ? :
|
|
|
3 |
0 |
unless &Scalar::Util::blessed($@)
|
|
|
0 |
0 |
if ($Nice::Try::HAS_CATCH)
|
|
|
0 |
3 |
if ($Nice::Try::DIED)
|
|
622
|
0 |
0 |
if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
|
|
|
0 |
0 |
&$Nice::Try::CATCH ? :
|
|
|
0 |
0 |
if scalar @Nice::Try::VOID
|
|
|
0 |
0 |
if ($Nice::Try::WANT eq 'OBJECT') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'CODE') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'HASH') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'ARRAY') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'GLOB') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'LIST') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'VOID') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'SCALAR') { }
|
|
|
0 |
0 |
if ($Nice::Try::WANTARRAY) { }
|
|
|
0 |
0 |
elsif (defined $Nice::Try::WANTARRAY) { }
|
|
|
0 |
0 |
if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
|
|
|
0 |
0 |
if $@
|
|
|
0 |
3 |
if (defined $Nice::Try::CATCH_DIED)
|
|
|
0 |
0 |
if (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__NEXT__') { }
|
|
|
0 |
0 |
elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__LAST__') { }
|
|
|
0 |
0 |
elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__REDO__') { }
|
|
|
0 |
0 |
elsif (defined $Nice::Try::BREAK and $Nice::Try::BREAK eq 'return') { }
|
|
|
0 |
0 |
if ($Nice::Try::WANT eq 'LIST') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'VOID') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'OBJECT') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'SCALAR') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'CODE') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'HASH') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'ARRAY') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'GLOB') { }
|
|
|
0 |
0 |
$Nice::Try::WANTARRAY ? :
|
|
|
0 |
0 |
if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
|
|
|
0 |
0 |
if (not defined $Nice::Try::BREAK or $Nice::Try::BREAK eq "return")
|
|
|
0 |
1 |
if (defined $Nice::Try::WANTARRAY || defined $Nice::Try::BREAK && $Nice::Try::BREAK eq 'return' and !&Scalar::Util::blessed($Nice::Try::RETVAL[0]) || &Scalar::Util::blessed($Nice::Try::RETVAL[0]) && !$Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL'))
|
|
|
0 |
0 |
if ($Nice::Try::BREAK eq 'next') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::BREAK eq 'last') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::BREAK eq 'redo') { }
|
|
|
0 |
3 |
if (defined $Nice::Try::BREAK)
|
|
|
0 |
3 |
scalar @Nice::Try::LAST_VAL > 1 ? :
|
|
627
|
3 |
0 |
if (scalar keys %$meta)
|
|
653
|
0 |
0 |
if $c
|
|
658
|
0 |
0 |
if (not $self->meta->length and $c =~ /^domain[[:blank:]\h]+\"(.*?)\"/) { }
|
|
669
|
18 |
4 |
if length $1
|
|
680
|
3 |
0 |
if length $1
|
|
696
|
2 |
0 |
if length $1
|
|
701
|
15 |
5 |
if length $1
|
|
706
|
8 |
0 |
if (length $2)
|
|
716
|
43 |
0 |
if ($e->can($sub)) { }
|
|
718
|
43 |
0 |
if length $1
|
|
727
|
0 |
0 |
if warnings::enabled()
|
|
730
|
3 |
0 |
unless $fh_was_open
|
|
731
|
2 |
1 |
if $elem->[-1] ne $e and length $e->msgid and ++$$seen{$e->msgid} < 2
|
|
732
|
3 |
0 |
if scalar @$elem and $elem->[0]->is_meta
|
|
743
|
0 |
4 |
unless ($strp)
|
|
759
|
0 |
2 |
unless defined $s and length $s
|
|
760
|
0 |
2 |
@_ ? :
|
|
765
|
4 |
2 |
defined $_ ? :
|
|
780
|
2 |
0 |
if ($attribute =~ /^[a-zA-Z][a-zA-Z0-9\_\-]+$/ and length $attribute <= 255)
|
|
782
|
2 |
0 |
if ($value =~ /^[a-zA-Z][a-zA-Z0-9\_\-]+$/ and length $value <= 255)
|
|
796
|
0 |
0 |
if ($self->{'use_json'} and -e "$this.json" || $this =~ /\.json$/) { }
|
|
798
|
0 |
0 |
-e "$this.json" ? :
|
|
805
|
0 |
0 |
if ($INC{'threads.pm'} and not exists $INC{'forks.pm'})
|
|
809
|
0 |
0 |
if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
|
|
|
0 |
0 |
&$Nice::Try::TRY ? :
|
|
|
0 |
0 |
if scalar @Nice::Try::VOID
|
|
|
0 |
0 |
if ($Nice::Try::WANT eq 'OBJECT') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'CODE') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'HASH') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'ARRAY') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'GLOB') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'LIST') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'VOID') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'SCALAR') { }
|
|
|
0 |
0 |
if defined $Nice::Try::LAST_VAL
|
|
|
0 |
0 |
if ($Nice::Try::WANTARRAY) { }
|
|
|
0 |
0 |
elsif (defined $Nice::Try::WANTARRAY) { }
|
|
|
0 |
0 |
if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
|
|
|
0 |
0 |
length $@ ? :
|
|
|
0 |
0 |
unless &Scalar::Util::blessed($@)
|
|
|
0 |
0 |
if ($Nice::Try::HAS_CATCH)
|
|
|
0 |
0 |
if ($Nice::Try::DIED)
|
|
812
|
0 |
0 |
if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
|
|
|
0 |
0 |
&$Nice::Try::CATCH ? :
|
|
|
0 |
0 |
if scalar @Nice::Try::VOID
|
|
|
0 |
0 |
if ($Nice::Try::WANT eq 'OBJECT') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'CODE') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'HASH') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'ARRAY') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'GLOB') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'LIST') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'VOID') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'SCALAR') { }
|
|
|
0 |
0 |
if ($Nice::Try::WANTARRAY) { }
|
|
|
0 |
0 |
elsif (defined $Nice::Try::WANTARRAY) { }
|
|
|
0 |
0 |
if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
|
|
|
0 |
0 |
if $@
|
|
|
0 |
0 |
if (defined $Nice::Try::CATCH_DIED)
|
|
|
0 |
0 |
if (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__NEXT__') { }
|
|
|
0 |
0 |
elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__LAST__') { }
|
|
|
0 |
0 |
elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__REDO__') { }
|
|
|
0 |
0 |
elsif (defined $Nice::Try::BREAK and $Nice::Try::BREAK eq 'return') { }
|
|
|
0 |
0 |
if ($Nice::Try::WANT eq 'LIST') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'VOID') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'OBJECT') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'SCALAR') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'CODE') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'HASH') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'ARRAY') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'GLOB') { }
|
|
|
0 |
0 |
$Nice::Try::WANTARRAY ? :
|
|
|
0 |
0 |
if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
|
|
|
0 |
0 |
if (not defined $Nice::Try::BREAK or $Nice::Try::BREAK eq "return")
|
|
|
0 |
0 |
if (defined $Nice::Try::WANTARRAY || defined $Nice::Try::BREAK && $Nice::Try::BREAK eq 'return' and !&Scalar::Util::blessed($Nice::Try::RETVAL[0]) || &Scalar::Util::blessed($Nice::Try::RETVAL[0]) && !$Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL'))
|
|
|
0 |
0 |
if ($Nice::Try::BREAK eq 'next') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::BREAK eq 'last') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::BREAK eq 'redo') { }
|
|
|
0 |
0 |
if (defined $Nice::Try::BREAK)
|
|
|
0 |
0 |
scalar @Nice::Try::LAST_VAL > 1 ? :
|
|
822
|
0 |
0 |
unless $self->parse($this)
|
|
832
|
2 |
0 |
if ($self->{'use_json'} and -e "$this.json" || $this =~ /\.json$/) { }
|
|
834
|
0 |
2 |
-e "$this.json" ? :
|
|
841
|
0 |
2 |
if ($INC{'threads.pm'} and not exists $INC{'forks.pm'})
|
|
845
|
0 |
0 |
if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
|
|
|
0 |
0 |
&$Nice::Try::TRY ? :
|
|
|
0 |
0 |
if scalar @Nice::Try::VOID
|
|
|
0 |
0 |
if ($Nice::Try::WANT eq 'OBJECT') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'CODE') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'HASH') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'ARRAY') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'GLOB') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'LIST') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'VOID') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'SCALAR') { }
|
|
|
0 |
0 |
if defined $Nice::Try::LAST_VAL
|
|
|
0 |
2 |
if ($Nice::Try::WANTARRAY) { }
|
|
|
2 |
0 |
elsif (defined $Nice::Try::WANTARRAY) { }
|
|
|
0 |
2 |
if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
|
|
|
0 |
2 |
length $@ ? :
|
|
|
2 |
0 |
unless &Scalar::Util::blessed($@)
|
|
|
0 |
0 |
if ($Nice::Try::HAS_CATCH)
|
|
|
0 |
2 |
if ($Nice::Try::DIED)
|
|
848
|
0 |
0 |
if not defined $Nice::Try::WANTARRAY and scalar @Nice::Try::LAST_VAL
|
|
|
0 |
0 |
&$Nice::Try::CATCH ? :
|
|
|
0 |
0 |
if scalar @Nice::Try::VOID
|
|
|
0 |
0 |
if ($Nice::Try::WANT eq 'OBJECT') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'CODE') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'HASH') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'ARRAY') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'GLOB') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'LIST') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'VOID') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'SCALAR') { }
|
|
|
0 |
0 |
if ($Nice::Try::WANTARRAY) { }
|
|
|
0 |
0 |
elsif (defined $Nice::Try::WANTARRAY) { }
|
|
|
0 |
0 |
if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
|
|
|
0 |
0 |
if $@
|
|
|
0 |
2 |
if (defined $Nice::Try::CATCH_DIED)
|
|
|
0 |
0 |
if (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__NEXT__') { }
|
|
|
0 |
0 |
elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__LAST__') { }
|
|
|
0 |
0 |
elsif (defined $Nice::Try::RETVAL[0] and $Nice::Try::RETVAL[0] eq '__REDO__') { }
|
|
|
0 |
0 |
elsif (defined $Nice::Try::BREAK and $Nice::Try::BREAK eq 'return') { }
|
|
|
0 |
0 |
if ($Nice::Try::WANT eq 'LIST') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'VOID') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'OBJECT') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'REFSCALAR') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'SCALAR') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'BOOLEAN') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'CODE') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'HASH') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'ARRAY') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::WANT eq 'GLOB') { }
|
|
|
0 |
0 |
$Nice::Try::WANTARRAY ? :
|
|
|
0 |
0 |
if (defined $Nice::Try::WANT and length $Nice::Try::WANT) { }
|
|
|
0 |
0 |
if (not defined $Nice::Try::BREAK or $Nice::Try::BREAK eq "return")
|
|
|
0 |
2 |
if (defined $Nice::Try::WANTARRAY || defined $Nice::Try::BREAK && $Nice::Try::BREAK eq 'return' and !&Scalar::Util::blessed($Nice::Try::RETVAL[0]) || &Scalar::Util::blessed($Nice::Try::RETVAL[0]) && !$Nice::Try::RETVAL[0]->isa('Nice::Try::SENTINEL'))
|
|
|
0 |
0 |
if ($Nice::Try::BREAK eq 'next') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::BREAK eq 'last') { }
|
|
|
0 |
0 |
elsif ($Nice::Try::BREAK eq 'redo') { }
|
|
|
0 |
2 |
if (defined $Nice::Try::BREAK)
|
|
|
0 |
2 |
scalar @Nice::Try::LAST_VAL > 1 ? :
|
|
850
|
0 |
2 |
if length $ref->{'domain'} and not length $self->domain
|
|
852
|
2 |
0 |
if ($ref->{'meta_keys'}) { }
|
|
|
0 |
0 |
elsif ($ref->{'meta'}) { }
|
|
861
|
2 |
0 |
if ($ref->{'meta'})
|
|
873
|
2 |
0 |
if (scalar @$meta_keys)
|
|
890
|
2 |
14 |
if ($def->{'msgid_plural'})
|
|
894
|
2 |
14 |
if (ref $def->{'msgstr'} eq 'ARRAY') { }
|
|
905
|
0 |
16 |
if $def->{'comment'}
|
|
906
|
0 |
16 |
if $def->{'context'}
|
|
907
|
0 |
16 |
if $def->{'flags'}
|
|
908
|
6 |
10 |
if $def->{'reference'}
|
|
909
|
0 |
16 |
if $self->encoding
|
|
923
|
0 |
2 |
if (@_) { }
|
|
931
|
0 |
0 |
if $self->{'plural'} and scalar @{$self->{'plural'};}
|
|
934
|
2 |
0 |
if ($pluralDef)
|
|
936
|
2 |
0 |
if ($pluralDef =~ /^[[:blank:]\h]*nplurals[[:blank:]\h]*=[[:blank:]\h]*(\d+)[[:blank:]\h]*\;[[:blank:]\h]*plural[[:blank:]\h]*=[[:blank:]\h]*(.*?)\;?$/i) { }
|
|
964
|
0 |
20 |
unless length $str
|
|
979
|
0 |
0 |
unless defined $rv
|
|
980
|
0 |
0 |
unless $rv
|
|
985
|
0 |
0 |
if ($elems->[$i] eq $elem)
|
|
1005
|
0 |
0 |
if scalar @_ and @_ % 2 || !(@_ % 2) && ref $_[1] eq 'HASH'
|
|
1007
|
0 |
0 |
unless length $this
|
|
1008
|
0 |
0 |
unless ($this)
|
|
1011
|
0 |
0 |
if ($fh = $self->source->handle) { }
|
|
|
0 |
0 |
elsif (my $file = $self->source->file) { }
|
|
1013
|
0 |
0 |
if $self->_can_write_fh($fh)
|
|
1017
|
0 |
0 |
if -e $file and -w $file
|
|
1020
|
0 |
0 |
unless $this
|
|
1022
|
0 |
0 |
unless $self->dump($fh)
|
|
1027
|
0 |
0 |
if (&Scalar::Util::reftype($this) eq 'GLOB') { }
|
|
|
0 |
0 |
elsif (-l $this) { }
|
|
|
0 |
0 |
elsif (-e $this) { }
|
|
1029
|
0 |
0 |
unless &Scalar::Util::openhandle($this)
|
|
1030
|
0 |
0 |
unless $self->_can_write_fh($this)
|
|
1039
|
0 |
0 |
unless (-f $this)
|
|
1052
|
0 |
0 |
unless $self->dump($fh)
|
|
1062
|
0 |
0 |
unless &Scalar::Util::openhandle($fh)
|
|
1074
|
0 |
0 |
unless ($self->exists($e, {"msgid_only", 1}))
|
|
1077
|
0 |
0 |
if $removedObj
|
|
1085
|
0 |
0 |
unless ($po->exists($e, {"msgid_only", 1}))
|
|
1092
|
0 |
0 |
unless $fh->seek(0, 0)
|
|
1094
|
0 |
0 |
unless $po->dump($fh)
|
|
1105
|
0 |
89 |
unless length $str
|
|
1130
|
0 |
0 |
if ($flags & 3 & 3)
|
|
1141
|
0 |
4 |
if (@_) { }
|
|
1144
|
0 |
0 |
if (ref $v and $self->_is_a($v, "DateTime"))
|
|
1159
|
0 |
4 |
unless (defined $meta and length $meta)
|
|
1171
|
0 |
21 |
if (@_)
|
|
1214
|
0 |
2 |
unless length $value
|
|
1225
|
0 |
0 |
unless (defined $self->{'original'} and length $self->{'original'})
|
|
1228
|
0 |
0 |
if (defined $self->{'value'} and length $self->{'value'})
|
|
1230
|
0 |
0 |
unless ($self->{'value'} =~ /^$Text::PO::HeaderValue::TYPE_REGEXP$/)
|
|
1238
|
0 |
0 |
if ($self->{'params'} and ref $self->{'params'} eq "HASH")
|
|
1243
|
0 |
0 |
unless ($params->[$i] =~ /^$Text::PO::HeaderValue::TOKEN_REGEXP$/)
|
|
1247
|
0 |
0 |
if (length $string > 0)
|
|
1265
|
2 |
0 |
if (@_)
|
|
1279
|
0 |
0 |
if ($str =~ /^$Text::PO::HeaderValue::TOKEN_REGEXP$/)
|
|
1284
|
0 |
0 |
if (length $str > 0 and not $str =~ /^$Text::PO::HeaderValue::TEXT_REGEXP$/)
|