| line |
true |
false |
branch |
|
26
|
0 |
6 |
unless my $self = $class->SUPER::new(@_) |
|
43
|
4 |
2 |
ref $incl eq 'ARRAY' ? : |
|
46
|
0 |
6 |
if ($handle_errors eq 'EXCEPTION') { } |
|
|
0 |
6 |
elsif ($handle_errors ne 'NATIVE') { } |
|
60
|
0 |
6 |
if ref $formatter eq 'CODE' |
|
65
|
6 |
0 |
$syntax eq 'HTML' ? : |
|
82
|
3 |
7 |
if (my $only = $args{'only_in_directory'}) |
|
84
|
3 |
0 |
if ref $only ne 'ARRAY' |
|
89
|
2 |
1 |
if grep(($_ eq $dir), @incl) |
|
96
|
1 |
8 |
if &textdomain($name, 'EXISTS') |
|
100
|
1 |
7 |
unless my $lexicon = delete $args{'lexicon'} || delete $args{'lexicons'} |
|
103
|
0 |
7 |
if (ref $lexicon eq 'ARRAY') |
|
104
|
0 |
0 |
unless @$lexicon < 2 |
|
108
|
0 |
0 |
unless $lexicon = $lexicon->[0] |
|
113
|
0 |
7 |
unless -d $lexicon |
|
122
|
1 |
6 |
if (my($other) = grep(($func eq $_->function), $self->_domains)) |
|
145
|
0 |
1 |
if $@ |
|
149
|
0 |
1 |
exists $args{'write_tables'} ? : |
|
152
|
0 |
1 |
if (my $fns = $args{'filenames'} || $args{'filename'}) { } |
|
153
|
0 |
0 |
ref $fns eq 'ARRAY' ? : |
|
159
|
1 |
1 |
if -f $name and $name =~ /$match/ |
|
183
|
2 |
0 |
if $stats |
|
184
|
2 |
0 |
if $write |
|
192
|
0 |
6 |
ref $_[-1] eq 'HASH' ? : |
|
193
|
4 |
2 |
@_ ? : |
|
194
|
2 |
4 |
if (@blocks == 1 and $blocks[0] =~ /\$[1-9]/) |
|
198
|
0 |
3 |
unless $cols[$1 - 1] |
|
210
|
1 |
7 |
if @wrap > 1 |
|
219
|
0 |
3 |
ref $_[-1] eq 'HASH' ? : |
|
221
|
0 |
3 |
unless my $templ = shift() |
|
247
|
6 |
0 |
unless $args->{'modifiers'} |
|
267
|
4 |
0 |
unless &blessed($_[0]) and $_[0]->isa('Template') |
|
271
|
0 |
0 |
unless $_[0]{'LRT_exceptions'} |
|
273
|
0 |
0 |
unless @_ |