Branch Coverage

blib/lib/oEdtk/Main.pm
Criterion Covered Total %
branch 1 214 0.4


line true false branch
204 0 0 if ($mnt ne 0) { }
350 0 0 if (${$refLigne;} =~ /^.{$offsetKey}(\w{$lenKey})/s and &oe_trt_ref_rec(, $refLigne, $offsetRec, $lenRec))
386 0 0 if ($motifs{$Rec_ID} eq '' and not $evalSsTrt{$Rec_ID}[0])
395 0 0 if $evalSsTrt{$Rec_ID}[0]
401 0 0 if $offsetRec > 0
404 0 0 unless @DATATAB = unpack($motifs{$Rec_ID}, ${$refLigne;})
408 0 0 if $evalSsTrt{$Rec_ID}[1]
411 0 0 if ($ouTags{$Rec_ID} ne '-1') { }
413 0 0 unless ${$refLigne;} .= sprintf($ouTags{$Rec_ID}, @DATATAB)
422 0 0 if $evalSsTrt{$Rec_ID}[2]
459 0 0 unless (defined $multiple)
460 0 0 if ($multiple =~ /^0\./) { }
0 0 elsif ($multiple =~ /^\./) { }
485 0 0 if (${$refMontant;} eq '' or ${$refMontant;} eq 0) { }
0 0 elsif (${$refMontant;} =~ /\D{2,}/) { }
505 0 0 if (${$refMontant;} =~ s/(\D{1})$/$hXVal{$1}/) { }
0 0 elsif (${$refMontant;} =~ /^-{1}/) { }
532 0 0 if ($nowDate > $date) { }
0 0 elsif ($nowDate < $date) { }
578 0 0 unless (defined $_DICO_COUNTRY)
582 0 0 if defined $country
591 0 0 unless (defined $_DICO_CHAR)
608 0 0 if (not defined $$rLine or length $$rLine == 0)
627 0 0 if (length $$rLine > 38)
628 0 0 unless (defined $_DICO_POST)
639 0 0 if ($TAG_MODE eq 'C7' and $$rLine =~ /\w+$/)
719 0 0 unless open IN, "$fi"
727 0 0 unless open OUT, "> $fo"
736 0 0 unless close OUT
754 0 0 unless $date =~ m[^\s*(\d{1,2})/(\d{1,2})/(\d{2}|\d{4})\s*$]
764 0 0 unless ($date =~ m[^\s*(\d{1,2})/(\d{1,2})/(\d{4})\s*$])
773 0 0 if ($date1 eq '')
780 0 0 unless (defined $wdate1)
784 0 0 unless (defined $wdate2)
794 0 0 if (oe_date_compare($date1, $date2) <= 0) { }
804 0 0 if (oe_date_compare($date1, $date2) <= 0) { }
824 0 0 if (${$refValue;}) { }
846 0 0 unless ($noedit)
882 0 0 if ($TAG_MODE eq 'TEX')
889 0 0 if (defined $val) { }
0 0 elsif (defined $name) { }
891 0 0 if ($val =~ /^[\d\.]+$/) { }
908 0 0 $1 ? :
959 0 0 unless (defined $$params{$key})
964 0 0 if ($^O ne 'MSWin32') { }
976 0 0 if ($$params{'input_code'}) { }
984 0 0 if ($defaults{'help'}) { }
0 0 elsif ($defaults{'noinputfiles'}) { }
0 0 elsif ($#ARGV == -1) { }
995 0 0 unless open IN, $$params{'input_code'}, $fi
1002 0 0 if (defined $async and $async =~ /^yes$/i) { }
0 0 elsif (defined $async and $async =~ /^no$/i) { }
1008 0 0 if ($$params{'fifo'} and $^O eq 'MSWin32')
1019 0 0 if (exists $ENV{'EDTK_OPTIONS'})
1026 0 0 if ($$params{'fifo'})
1028 0 0 unless mkfifo($$params{'outfile'}, 448)
1033 0 0 unless open OUT, $$params{'output_code'}, $$params{'outfile'}
1039 0 0 if (defined $$cfg{'EDTK_COMPO_INCLUDE'} and $$cfg{'EDTK_COMPO_INCLUDE'} =~ /yes/i)
1049 0 0 if ($env ne 'Production') { }
1061 0 0 if ($$params{'index'})
1084 0 0 if $DATATAB[$i] eq ''
1102 0 0 if ($DATATAB[$i] =~ /^\s*[\d\.\s]+$/)
1135 0 0 unless open my $lock, '>', $lockfile
1145 0 0 unless flock $lock, 2
1148 0 0 if (-f $DMG_path)
1149 0 0 unless copy($DMG_path, "$DMG_path.bak")
1151 0 0 if (defined $$cfg{'EDTK_TESTDATE'})
1155 0 0 if ($@)
1157 0 0 unless copy("$DMG_path.bak", $DMG_path)
1174 0 0 if $xTypTrt =~ /[MGTD]/
1176 0 0 unless ($xTypTrt =~ /D/)
1191 0 0 unless ($xTypTrt =~ /[MTD]/)
1208 0 0 unless open my $lock, '>', $lockfile
1232 0 0 unless flock $lock, 1
1235 0 0 if (defined $$cfg{'EDTK_TESTDATE'})
1240 0 0 if $@
1247 0 0 unless $zip->writeToFileNamed("$$cfg{'EDTK_DIR_OUTMNGR'}/$SsLot.zip") == 0
1250 0 0 unless ($xTypTrt =~ /D/)
1260 0 0 unless ($xTypTrt =~ /D/)
1285 0 0 if ($TAG_MODE eq 'TEX')
1289 0 0 if (@opt)
1297 0 0 unless close OUT
1298 0 0 if ($$params{'noinputfiles'}) { }
1300 0 0 unless close IN
1303 0 0 if ($$params{'fifo'}) { }
1306 0 0 unless (defined $$params{'cldstatus'})
1311 0 0 if ($kid <= 0)
1317 0 0 if ($status != 0)
1338 0 0 if ($^O eq 'MSWin32') { }
1360 0 0 if ($_ID_LDOC eq '')
1368 0 0 if (length $pid > 5)
1415 0 0 if (defined $_app_typ_trt and not $xTypTrt =~ /^[TD]/i)
1418 0 0 if (not $xTypTrt =~ /^([MGLHTDU])/i) { }
0 0 elsif ($xTypTrt =~ /^([MGL])/i) { }
0 0 elsif ($xTypTrt =~ /^([HTD])/i) { }
1438 0 0 if (defined $_DOCLIB)
1441 0 0 if (not defined $doclib) { }
1483 0 0 unless (defined $_DICT)
1490 0 0 if (defined $parametre) { }
1498 0 0 if (defined $entity)
1523 0 0 if ($nb_car lt 6)
1525 0 0 if ($cpt_value) { }
1533 0 0 if (exists $hListeId{$id})
1543 0 0 if $cpt >= 123
1580 0 0 if ($@)
1585 0 0 unless (defined $_backup_date)
1592 0 1 if defined $_backup_date