line |
true |
false |
branch |
21
|
0 |
0 |
unless -e $dateiEcgHash |
22
|
0 |
0 |
unless -e $dateiEin |
25
|
0 |
0 |
unless ($gesOrFixOrDel) |
28
|
0 |
0 |
if $gesOrFixOrDel ne 'F' and $gesOrFixOrDel ne 'D' and $gesOrFixOrDel ne 'G' |
32
|
0 |
0 |
unless ($feld) |
33
|
0 |
0 |
if ($gesOrFixOrDel eq 'F') { } |
|
0 |
0 |
elsif ($gesOrFixOrDel eq 'D') { } |
|
0 |
0 |
elsif ($gesOrFixOrDel eq 'G') { } |
36
|
0 |
0 |
unless $feld |
41
|
0 |
0 |
unless $feld |
44
|
0 |
0 |
unless $trennZ |
57
|
0 |
0 |
unless open my $fhHash, '<', $dateiEcgHash |
63
|
0 |
0 |
unless close $fhHash |
65
|
0 |
0 |
unless open my $fhEin, '<', $dateiEin |
66
|
0 |
0 |
unless open my $fhAus, '>', $dateiAus |
71
|
0 |
0 |
if ($gesOrFixOrDel eq 'F') { } |
|
0 |
0 |
elsif ($gesOrFixOrDel eq 'D') { } |
86
|
0 |
0 |
unless ($verboten{sha1($email)} or $verboten{sha1('@' . $domain)}) |
91
|
0 |
0 |
unless close $fhEin |
92
|
0 |
0 |
unless close $fhAus |