| line |
true |
false |
branch |
|
89
|
0 |
0 |
unless my $io = 'IO::File'->new($opts{'filepath'}, 'r') |
|
113
|
0 |
0 |
unless $$o{'resultsfile'} |
|
114
|
0 |
0 |
if exists $$o{'resultsfile_io'} |
|
116
|
0 |
0 |
unless $$o{'resultsfile_io'} = 'IO::File'->new($$o{'resultsfile'}, 'w') |
|
137
|
0 |
0 |
if (exists $$o{'experiments'}) |
|
147
|
0 |
0 |
unless /^Experiment\s(\S+)$/ |
|
150
|
0 |
0 |
unless defined $cell and defined $cond and defined $repl |
|
157
|
0 |
0 |
unless exists $condition_replicates{$cc} |
|
357
|
0 |
0 |
if ($opts{'output_directory'}) |
|
358
|
0 |
0 |
unless -d $opts{'output_directory'} |
|
361
|
0 |
0 |
if (exists $$o{'replicate_comparison'}) |
|
381
|
0 |
0 |
if ($opts{'output_directory'}) |
|
382
|
0 |
0 |
unless my $fo = 'IO::File'->new($opts{'output_directory'} . '/' . $cr . '.txt', 'w') |
|
387
|
0 |
0 |
if @$_ > $table_length |
|
389
|
0 |
0 |
defined $$results[$_][$i] ? : |
|
416
|
0 |
0 |
if (exists $$o{'response_comparisons'}) |
|
431
|
0 |
0 |
unless $cell2 eq $cell1 |
|
433
|
0 |
0 |
if $cond2 eq $cond1 |
|
436
|
0 |
0 |
unless defined $comparisons{$comp_key} |
|
460
|
0 |
0 |
if (exists $$o{'cell_comparisons'}) |
|
475
|
0 |
0 |
unless $cond1 eq $cond1 |
|
477
|
0 |
0 |
if $cell1 eq $cell2 |
|
480
|
0 |
0 |
unless defined $comparisons{$comp_key} |
|
501
|
0 |
0 |
if (exists $$o{'differential_response_comparisons'}) |
|
513
|
0 |
0 |
unless $cond1_1 eq $cond2_1 and $cond1_2 eq $cond2_2 or $cond1_1 eq $cond2_2 and $cond1_2 eq $cond2_1 |
|
535
|
0 |
0 |
if (exists $$o{'data'}) |
|
568
|
0 |
0 |
if ($d =~ /\d/) { } |
|
590
|
0 |
0 |
if ($opts{'output_directory'}) |
|
591
|
0 |
0 |
unless -d $opts{'output_directory'} |
|
606
|
0 |
0 |
unless @conds == 2 |
|
636
|
0 |
0 |
if ($$data{$r}[$i] ne '' and $medians{$ccc}[$i] ne '') { } |
|
656
|
0 |
0 |
if (@{$cfmedians{$cf}[$i];} < 2) { } |
|
680
|
0 |
0 |
if ($opts{'output_directory'}) |
|
681
|
0 |
0 |
unless my $fo = 'IO::File'->new("$opts{'output_directory'}/$cf.txt", 'w') |
|
686
|
0 |
0 |
if @$_ > $table_length |
|
688
|
0 |
0 |
defined $$results[$_][$i] ? : |
|
716
|
0 |
0 |
if ($opts{'output_directory'}) |
|
717
|
0 |
0 |
unless -d $opts{'output_directory'} |
|
736
|
0 |
0 |
unless @cells == 2 |
|
766
|
0 |
0 |
if (defined $$data{$r}[$i] and $$data{$r}[$i] ne '' and defined $medians{$ccc}[$i] and $medians{$ccc}[$i] ne '') { } |
|
786
|
0 |
0 |
if (@{$cfmedians{$cf}[$i];} < 2) { } |
|
810
|
0 |
0 |
if ($opts{'output_directory'}) |
|
811
|
0 |
0 |
unless my $fo = 'IO::File'->new("$opts{'output_directory'}/$cf.txt", 'w') |
|
816
|
0 |
0 |
if @$_ > $table_length |
|
818
|
0 |
0 |
defined $$results[$_][$i] ? : |
|
843
|
0 |
0 |
if ($x =~ /^[-\.\d]+$/) { } |
|
844
|
0 |
0 |
if ($x < 1000) { } |
|
868
|
0 |
0 |
if ($opts{'output_directory'}) |
|
869
|
0 |
0 |
unless -d $opts{'output_directory'} |
|
925
|
0 |
0 |
if ($cell_replicate ne '' and $counter_median ne '') |
|
947
|
0 |
0 |
if ($opts{'output_directory'}) |
|
948
|
0 |
0 |
unless my $fo = 'IO::File'->new("$opts{'output_directory'}/$cf.txt", 'w') |
|
953
|
0 |
0 |
if @$_ > $table_length |
|
955
|
0 |
0 |
defined $$results[$_][$i] ? : |
|
979
|
0 |
0 |
if exists $$o{'medians'} |
|
981
|
0 |
0 |
if ($opts{'output_directory'}) |
|
982
|
0 |
0 |
unless -d $opts{'output_directory'} |
|
1020
|
0 |
0 |
if ($opts{'output_directory'}) |
|
1026
|
0 |
0 |
if ($o->resultsfile) |
|
1050
|
0 |
0 |
$en[1] ? : |
|
1071
|
0 |
0 |
unless my $io = 'IO::File'->new($fn, 'w') |
|
1076
|
0 |
0 |
if $l > $L |
|
1092
|
0 |
0 |
/\d/ ? : |
|
1093
|
0 |
0 |
if scalar @x < 2 |
|
1094
|
0 |
0 |
if (@x % 2) { } |
|
1116
|
0 |
0 |
if ($io) |
|
1160
|
0 |
0 |
if ($h =~ /^Column\s(\d+)$/) { } |
|
|
0 |
0 |
elsif ($h eq 'DerivedFrom') { } |
|
|
0 |
0 |
elsif ($h =~ /Regression/) { } |
|
|
0 |
0 |
elsif ($h =~ /Statistic/) { } |
|
|
0 |
0 |
elsif ($h =~ /^M$|^C$|^Value$/) { } |
|
1171
|
0 |
0 |
$DerivedFrom eq 'rotateToRegressionLine' ? : |
|
1179
|
0 |
0 |
if ($h =~ /^Column\s(\d+)$/) |
|
1193
|
0 |
0 |
if ($h eq 'CompareColumn') |
|
1208
|
0 |
0 |
$h eq 'SpreadOverErrorPvalue' ? : |