| line |
true |
false |
branch |
|
26
|
0 |
0 |
if ($tag =~ /^-/) |
|
27
|
0 |
0 |
unless $data{'dbase'} |
|
28
|
0 |
0 |
unless ($data{'host'}) |
|
33
|
0 |
0 |
unless ($data{'user'} and $data{'pass'}) |
|
43
|
0 |
0 |
if ($tname =~ /^Image_Seq$/i) |
|
45
|
0 |
0 |
unless ($ok) |
|
58
|
0 |
0 |
if ($tag =~ /^-/) |
|
59
|
0 |
0 |
if ref $data{'dbh'} ne 'DBI::db' |
|
64
|
0 |
0 |
if $data{'submitter_id'} < 0 |
|
65
|
0 |
0 |
if $data{'verbose'} |
|
69
|
0 |
0 |
unless -d $data{'repository_url'} |
|
75
|
0 |
0 |
unless $data{'experiment'} |
|
79
|
0 |
0 |
if $data{'experiment_id'} < 0 |
|
81
|
0 |
0 |
if $data{'verbose'} |
|
85
|
0 |
0 |
unless defined $data{'array_type'} |
|
86
|
0 |
0 |
unless $data{'array_name'} |
|
87
|
0 |
0 |
if $data{'array_type'} =~ /^\d+/ |
|
88
|
0 |
0 |
unless $data{'array_id'} |
|
90
|
0 |
0 |
if $data{'array_id'} < 0 |
|
91
|
0 |
0 |
if $data{'verbose'} |
|
96
|
0 |
0 |
unless $data{'format'} |
|
97
|
0 |
0 |
unless $data{'format'} =~ /\bgenespring\b/ |
|
100
|
0 |
0 |
unless -f "$templateDir/$data{'format'}.tmpl" |
|
102
|
0 |
0 |
if $data{'verbose'} |
|
104
|
0 |
0 |
if $data{'verbose'} |
|
107
|
0 |
0 |
if $data{'verbose'} |
|
114
|
0 |
0 |
if $data{'verbose'} |
|
126
|
0 |
0 |
if $data{'verbose'} |
|
141
|
0 |
0 |
if $data{'verbose'} |
|
169
|
0 |
0 |
if ($i == 1) { } |
|
193
|
0 |
0 |
if ($tag =~ /^-/) |
|
194
|
0 |
0 |
if ref $data{'dbh'} ne 'DBI::db' |
|
195
|
0 |
0 |
unless -f $data{'matrix_file'} |
|
199
|
0 |
0 |
unless $data{'format'} =~ /AFF|TOR/ |
|
202
|
0 |
0 |
unless defined $data{'image_analysis_protocol'} |
|
206
|
0 |
0 |
if $data{'image_analysis_protocol_id'} < 0 |
|
208
|
0 |
0 |
if $data{'verbose'} |
|
212
|
0 |
0 |
unless defined $data{'scanning_protocol'} |
|
216
|
0 |
0 |
if $data{'scanning_protocol_id'} < 0 |
|
218
|
0 |
0 |
if $data{'verbose'} |
|
222
|
0 |
0 |
unless defined $data{'hybridisation_protocol'} |
|
226
|
0 |
0 |
if $data{'hybridisation_protocol_id'} < 0 |
|
228
|
0 |
0 |
if $data{'verbose'} |
|
234
|
0 |
0 |
if $data{'submitter_id'} < 0 |
|
236
|
0 |
0 |
if $data{'verbose'} |
|
240
|
0 |
0 |
unless defined $data{'array_type'} |
|
241
|
0 |
0 |
if $data{'array_type'} =~ /^\d+/ |
|
242
|
0 |
0 |
unless $data{'array_id'} |
|
244
|
0 |
0 |
if $data{'array_id'} < 0 |
|
245
|
0 |
0 |
if $data{'verbose'} |
|
249
|
0 |
0 |
unless $data{'experiment'} |
|
253
|
0 |
0 |
if $data{'experiment_id'} < 0 |
|
255
|
0 |
0 |
if $data{'verbose'} |
|
259
|
0 |
0 |
unless $data{'extract'} |
|
262
|
0 |
0 |
if $data{'extract_id'} < 0 |
|
263
|
0 |
0 |
if $data{'verbose'} |
|
266
|
0 |
0 |
if ($data{'public'} =~ /true/i or $data{'public'} eq '1') { } |
|
268
|
0 |
0 |
if $data{'verbose'} |
|
271
|
0 |
0 |
if $data{'verbose'} |
|
280
|
0 |
0 |
if ($data{'hybridisation'}) |
|
283
|
0 |
0 |
if $Hybridisation_ID < 0 |
|
285
|
0 |
0 |
if ($Hybridisation_ID < 0) |
|
294
|
0 |
0 |
if $data{'verbose'} |
|
297
|
0 |
0 |
if ($data{'image'}) |
|
299
|
0 |
0 |
if $Image_ID < 0 |
|
301
|
0 |
0 |
if ($Image_ID < 0) |
|
312
|
0 |
0 |
if $data{'verbose'} |
|
321
|
0 |
0 |
if $data{'verbose'} |
|
324
|
0 |
0 |
if $data{'verbose'} |
|
326
|
0 |
0 |
if $data{'verbose'} |
|
330
|
0 |
0 |
if $data{'verbose'} |
|
341
|
0 |
0 |
unless $spotID |
|
473
|
0 |
0 |
if ($name =~ /^\d+$/) { } |
|
477
|
0 |
0 |
unless defined $id |
|
478
|
0 |
0 |
unless defined $name |
|
486
|
0 |
0 |
if ($name =~ /^\d+$/) { } |
|
490
|
0 |
0 |
unless defined $id |
|
491
|
0 |
0 |
unless defined $name |
|
499
|
0 |
0 |
if ($name =~ /^\d+$/) { } |
|
503
|
0 |
0 |
unless defined $id |
|
504
|
0 |
0 |
unless defined $name |
|
512
|
0 |
0 |
if ($name =~ /^\d+$/) { } |
|
516
|
0 |
0 |
unless defined $id |
|
517
|
0 |
0 |
unless defined $name |
|
525
|
0 |
0 |
if ($name =~ /^\d+$/) { } |
|
529
|
0 |
0 |
unless defined $id |
|
530
|
0 |
0 |
unless defined $name |
|
539
|
0 |
0 |
if ($fileType eq 'AFF') { } |
|
|
0 |
0 |
elsif ($fileType eq 'TOR') { } |
|
545
|
0 |
0 |
if $l =~ /Begin Measurements/ |
|
560
|
0 |
0 |
unless $l =~ /^\d/ |
|
573
|
0 |
0 |
if $l =~ /Begin Measurements/ |
|
575
|
0 |
0 |
if $l =~ /^End/ |
|
576
|
0 |
0 |
unless $l =~ /^\d/ |
|
588
|
0 |
0 |
unless ($column =~ /^\d+$/) |
|
592
|
0 |
0 |
if ($a eq $column) |
|
599
|
0 |
0 |
if ($fileType eq 'AFF') { } |
|
|
0 |
0 |
elsif ($fileType eq 'TOR') { } |
|
613
|
0 |
0 |
if ($name =~ /^\d+$/) { } |
|
617
|
0 |
0 |
unless defined $id |
|
618
|
0 |
0 |
unless defined $name |
|
628
|
0 |
0 |
unless defined $id |
|
635
|
0 |
0 |
if ($l =~ /Expression Analysis: Metrics Tab/) { } |
|
|
0 |
0 |
elsif ($l =~ /^\?\?/) { } |