| line |
true |
false |
branch |
|
30
|
0 |
6 |
unless my $self = $class->SUPER::new(@_) |
|
47
|
4 |
2 |
ref $incl eq 'ARRAY' ? : |
|
50
|
0 |
6 |
if ($handle_errors eq 'EXCEPTION') { } |
|
|
0 |
6 |
elsif ($handle_errors ne 'NATIVE') { } |
|
64
|
0 |
6 |
if ref $formatter eq 'CODE' |
|
69
|
6 |
0 |
$syntax eq 'HTML' ? : |
|
86
|
3 |
7 |
if (my $only = $args{'only_in_directory'}) |
|
88
|
3 |
0 |
if ref $only ne 'ARRAY' |
|
93
|
2 |
1 |
if grep(($_ eq $dir), @incl) |
|
100
|
1 |
8 |
if &textdomain($name, 'EXISTS') |
|
104
|
1 |
7 |
unless my $lexicon = delete $args{'lexicon'} || delete $args{'lexicons'} |
|
107
|
0 |
7 |
if (ref $lexicon eq 'ARRAY') |
|
108
|
0 |
0 |
unless @$lexicon < 2 |
|
112
|
0 |
0 |
unless $lexicon = $lexicon->[0] |
|
117
|
0 |
7 |
unless -d $lexicon |
|
126
|
1 |
6 |
if (my($other) = grep(($func eq $_->function), $self->_domains)) |
|
149
|
0 |
1 |
if $@ |
|
153
|
0 |
1 |
exists $args{'write_tables'} ? : |
|
156
|
0 |
1 |
if (my $fns = $args{'filenames'} || $args{'filename'}) { } |
|
157
|
0 |
0 |
ref $fns eq 'ARRAY' ? : |
|
163
|
1 |
1 |
if -f $name and $name =~ /$match/ |
|
187
|
2 |
0 |
if $stats |
|
188
|
2 |
0 |
if $write |
|
196
|
0 |
6 |
ref $_[-1] eq 'HASH' ? : |
|
197
|
4 |
2 |
@_ ? : |
|
198
|
2 |
4 |
if (@blocks == 1 and $blocks[0] =~ /\$[1-9]/) |
|
202
|
0 |
3 |
unless $cols[$1 - 1] |
|
214
|
1 |
7 |
if @wrap > 1 |
|
223
|
0 |
3 |
ref $_[-1] eq 'HASH' ? : |
|
225
|
0 |
3 |
unless my $templ = shift() |
|
251
|
6 |
0 |
unless $args->{'modifiers'} |
|
271
|
4 |
0 |
unless &blessed($_[0]) and $_[0]->isa('Template') |
|
275
|
0 |
0 |
unless $_[0]{'LRT_exceptions'} |
|
277
|
0 |
0 |
unless @_ |