line |
true |
false |
branch |
74
|
0 |
0 |
unless open our $result, '>', $nome4 |
75
|
0 |
0 |
unless open my $registro, '>', $nome5 |
91
|
0 |
0 |
unless open my $in, '<', $nome1 |
92
|
0 |
0 |
unless open my $out, '>', $nome2 |
98
|
0 |
0 |
unless $line |
104
|
0 |
0 |
unless ($_ eq 's+' | $_ eq '0' | $_ eq $reg | $_ eq $reg2) |
112
|
0 |
0 |
if ($tempo < 2) |
122
|
0 |
0 |
unless open my $in2, '<', $nome2 |
123
|
0 |
0 |
unless open my $out2, '>', $nome3 |
132
|
0 |
0 |
unless $lista[$inicio] |
135
|
0 |
0 |
if ($lista[$inicio] =~ /$pesquisa/i) |
140
|
0 |
0 |
if ($controle < $ii) |
165
|
0 |
0 |
if ($tempo == 3) |
174
|
0 |
0 |
unless open my $in1, '<', $nome1 |
175
|
0 |
0 |
unless open my $in2, '<', $nome2 |
176
|
0 |
0 |
unless open my $out1, '>', $nome3 |
192
|
0 |
0 |
if ($linha2 =~ /.+,.+,$linha1/i) |
219
|
0 |
0 |
unless open my $incf, '<', $nome2 |
222
|
0 |
0 |
unless open my $indf, '<', $nome2 |
225
|
0 |
0 |
unless open my $out, '>', $nome2 |
232
|
0 |
0 |
unless $lista1[$linha] |
251
|
0 |
0 |
unless open my $incfdf, '<', $nome2 |
254
|
0 |
0 |
unless open my $intf, '<', $nome2 |
257
|
0 |
0 |
unless open my $outtot, '>', $nome2 |
265
|
0 |
0 |
unless $listatf[$linhatf] |
268
|
0 |
0 |
unless $listadf[$linhadf] |
272
|
0 |
0 |
if ($listatf[$linhatf] =~ /.+,.+,$listadf[$linhadf]/i) |
293
|
0 |
0 |
unless open my $zincinco, '<', "1 ($znum).txt" |
297
|
0 |
0 |
unless open my $zoutx, '>', "1 ($znum).txt" |
299
|
0 |
0 |
unless open my $zregistro, '<', "registro1 ($znum).txt" |
304
|
0 |
0 |
unless $zin1[$zinic] |
311
|
0 |
0 |
unless $zin2[$zlinhac] |
315
|
0 |
0 |
if ("$zin3[$zlinhac]\n" =~ /$zinicc\n/) |