| line |
true |
false |
branch |
|
62
|
0 |
0 |
if ($conf_dir and $home_for_test)
|
|
73
|
0 |
0 |
if $conf_dir and $conf_file_name
|
|
82
|
0 |
0 |
if (my $setup = $t_data->{'setup'}) { }
|
|
|
0 |
0 |
elsif ($ex_data->is_dir) { }
|
|
|
0 |
0 |
elsif ($ex_data->exists) { }
|
|
87
|
0 |
0 |
ref $map eq 'ARRAY' ? :
|
|
|
0 |
0 |
ref $map eq 'HASH' ? :
|
|
89
|
0 |
0 |
unless (defined $destination_str)
|
|
92
|
0 |
0 |
if $home_for_test
|
|
96
|
0 |
0 |
unless $data_file->exists
|
|
99
|
0 |
0 |
if (ref $map eq "ARRAY")
|
|
103
|
0 |
0 |
if $home_for_test
|
|
114
|
0 |
0 |
$conf_dir ? :
|
|
116
|
0 |
0 |
if $trace
|
|
118
|
0 |
0 |
unless dircopy($ex_data->stringify, $destination_dir->stringify)
|
|
124
|
0 |
0 |
unless defined $conf_dir
|
|
125
|
0 |
0 |
unless defined $conf_file
|
|
128
|
0 |
0 |
if $trace
|
|
130
|
0 |
0 |
unless fcopy($ex_data->stringify, $conf_file->stringify)
|
|
152
|
0 |
0 |
if $child->is_dir
|
|
165
|
0 |
0 |
if ($t->{'config_file'})
|
|
166
|
0 |
0 |
$conf_dir ? :
|
|
176
|
0 |
0 |
if (my $info = $t->{'log4perl_load_warnings'} or $main::_use_log4perl_to_warn) { }
|
|
|
0 |
0 |
elsif ($t->{'no_warnings'} || exists $t->{'load_warnings'} and not defined $t->{'load_warnings'}) { }
|
|
204
|
0 |
0 |
if (ref $v eq 'ARRAY') { }
|
|
205
|
0 |
0 |
if @$v > 0
|
|
214
|
0 |
0 |
if (my $info = $t->{'log4perl_update_warnings'}) { }
|
|
|
0 |
0 |
elsif (my $uw = delete $args{'update_warnings'}) { }
|
|
230
|
0 |
0 |
if (defined $ret) { }
|
|
242
|
0 |
0 |
if $trace
|
|
259
|
0 |
0 |
if $trace
|
|
265
|
0 |
0 |
if (defined $t->{'dump_errors'})
|
|
277
|
0 |
0 |
if ($test_logs and (my $info = $t->{'log4perl_dump_warnings'}) || $main::_use_log4perl_to_warn) { }
|
|
|
0 |
0 |
elsif (not $test_logs or $no_warnings) { }
|
|
|
0 |
0 |
elsif (exists $t->{'dump_warnings'} and not defined $t->{'dump_warnings'}) { }
|
|
293
|
0 |
0 |
if $t->{'dump_warnings'}
|
|
298
|
0 |
0 |
if $trace
|
|
307
|
0 |
0 |
ref $c eq 'ARRAY' ? :
|
|
320
|
0 |
0 |
ref $check_data_l eq 'ARRAY' ? :
|
|
323
|
0 |
0 |
ref $check_data eq 'HASH' ? :
|
|
324
|
0 |
0 |
ref $check_data eq 'HASH' ? :
|
|
325
|
0 |
0 |
@check_args ? :
|
|
329
|
0 |
0 |
ref $check_v_l eq 'ARRAY' ? :
|
|
331
|
0 |
0 |
if (ref $check_v eq 'Regexp') { }
|
|
371
|
0 |
0 |
ref $c eq 'ARRAY' ? :
|
|
376
|
0 |
0 |
ref $spec eq 'ARRAY' ? :
|
|
384
|
0 |
0 |
if (ref $check eq 'Regexp') { }
|
|
385
|
0 |
0 |
if $k =~ /$check/l
|
|
388
|
0 |
0 |
if $k eq $check
|
|
391
|
0 |
0 |
if ($invert) { }
|
|
413
|
0 |
0 |
if ($^O eq "MSWin32" and my $fm = $t->{'file_mode'})
|
|
418
|
0 |
0 |
if (my $fm = $t->{'file_mode'})
|
|
423
|
0 |
0 |
if ($stat)
|
|
435
|
0 |
0 |
if (my $fc = $t->{'file_contents'} || $t->{'file_content'})
|
|
438
|
0 |
0 |
ref $t eq 'ARRAY' ? :
|
|
446
|
0 |
0 |
if (my $fc = $t->{'file_contents_like'})
|
|
449
|
0 |
0 |
ref $t eq 'ARRAY' ? :
|
|
457
|
0 |
0 |
if (my $fc = $t->{'file_contents_unlike'})
|
|
460
|
0 |
0 |
ref $t eq 'ARRAY' ? :
|
|
475
|
0 |
0 |
$conf_dir ? :
|
|
|
0 |
0 |
$t->{'setup'} ? :
|
|
479
|
0 |
0 |
if defined $t->{'file_check_sub'}
|
|
488
|
0 |
0 |
unless dircopy($wr_dir->stringify, $wr_dir2->stringify)
|
|
492
|
0 |
0 |
if $t->{'backend_arg'}
|
|
516
|
0 |
0 |
unless $config_classes
|
|
519
|
0 |
0 |
ref $c eq 'HASH' ? :
|
|
543
|
0 |
0 |
unless ($result = do "./$test_group_conf")
|
|
544
|
0 |
0 |
if $@
|
|
545
|
0 |
0 |
unless defined $result
|
|
546
|
0 |
0 |
unless $result
|
|
550
|
0 |
0 |
if (ref $result eq 'ARRAY') { }
|
|
|
0 |
0 |
elsif (ref $result eq 'HASH') { }
|
|
575
|
0 |
0 |
if ($test_suite_data->{'skip'})
|
|
586
|
0 |
0 |
unless (defined $test_suite_data->{'model_to_test'})
|
|
588
|
0 |
0 |
unless (defined $test_suite_data->{'model_to_test'})
|
|
610
|
0 |
0 |
if defined $conf_file_name
|
|
617
|
0 |
0 |
if (defined $do and not $t_name =~ /$do/l)
|
|
630
|
0 |
0 |
if $model->has_instance($inst_name)
|
|
634
|
0 |
0 |
if $t->{'backend_arg'}
|
|
653
|
0 |
0 |
if $test_logs
|
|
655
|
0 |
0 |
if $t->{'update'}
|
|
657
|
0 |
0 |
if $t->{'load'}
|
|
660
|
0 |
0 |
if $t->{'check_before_fix'}
|
|
662
|
0 |
0 |
if $t->{'apply_fix'}
|
|
668
|
0 |
0 |
if $t->{'check'}
|
|
670
|
0 |
0 |
if $t->{'has_key'}
|
|
671
|
0 |
0 |
if $t->{'has_not_key'}
|
|
673
|
0 |
0 |
if $t->{'verify_annotation'}
|
|
681
|
0 |
0 |
if $ex_data->is_dir
|
|
685
|
0 |
0 |
if $t->{'load2'}
|
|
698
|
0 |
0 |
if defined $test_suite_data->{'conf_file_name'}
|
|
700
|
0 |
0 |
if $t->{'wr_check'}
|
|
713
|
0 |
0 |
if $t->{$_}
|
|
720
|
0 |
0 |
if ($@)
|
|
732
|
1 |
0 |
if (@args) { }
|
|
739
|
0 |
1 |
$arg =~ /t/l ? :
|
|
740
|
0 |
1 |
if $arg =~ /l/l
|
|
744
|
0 |
1 |
if ($log and -e $log4perl_user_conf_file) { }
|
|
748
|
0 |
1 |
$log ? :
|
|
751
|
0 |
1 |
if $arg =~ /e/l
|
|
761
|
0 |
0 |
$opts->{'log'} ? :
|
|
771
|
0 |
0 |
if $test_only_app and $test_only_app ne $test_group
|
|
773
|
0 |
0 |
unless $model
|