| line |
true |
false |
branch |
|
22
|
0 |
0 |
unless defined $$self{$_} |
|
32
|
0 |
0 |
unless $configFileName |
|
33
|
0 |
0 |
unless -f $configFileName |
|
37
|
0 |
0 |
unless open CONFIG, $configFileName |
|
46
|
0 |
0 |
if $@ |
|
49
|
0 |
0 |
unless $_[0]->respondsTo('configFile') |
|
60
|
0 |
0 |
unless ref $_[1] |
|
84
|
0 |
0 |
unless $self->respondsTo('relayPreserve') |
|
94
|
0 |
0 |
unless -d $$self{'mailRelayDirectory'} |
|
106
|
0 |
0 |
if $Mail::POPRelay::DEBUG |
|
117
|
0 |
0 |
if $Mail::POPRelay::DEBUG |
|
120
|
0 |
0 |
unless unlink $_ |
|
131
|
0 |
0 |
if $Mail::POPRelay::DEBUG |
|
135
|
0 |
0 |
unless my $modifyTime = (stat "$_")[8] |
|
137
|
0 |
0 |
if (time > $modifyTime + $$self{'mailRelayPeriod'}) |
|
138
|
0 |
0 |
if $Mail::POPRelay::DEBUG |
|
139
|
0 |
0 |
unless unlink $_ |
|
143
|
0 |
0 |
wantarray ? : |
|
154
|
0 |
0 |
unless (-e "$$self{'mailRelayDirectory'}/$userIpAddress") |
|
155
|
0 |
0 |
unless open OUT, ">$$self{'mailRelayDirectory'}/$userIpAddress" |
|
171
|
0 |
0 |
unless open PACCESS, "<$mailRelayFile" |
|
173
|
0 |
0 |
if $_ eq "# Above configuration will be preserved by POPRelay.\n" |
|
185
|
0 |
0 |
unless mkdir $$self{'mailRelayDirectory'}, 23 |
|
200
|
0 |
0 |
unless -d $$self{'mailRelayDirectory'} |
|
205
|
0 |
0 |
if $Mail::POPRelay::DEBUG |
|
208
|
0 |
0 |
if $Mail::POPRelay::DEBUG |
|
218
|
0 |
0 |
unless open RACCESS, ">$mailRelayFile" |
|
223
|
0 |
0 |
if ($$self{'mailRelayIsDatabase'}) |
|
224
|
0 |
0 |
if $Mail::POPRelay::DEBUG |
|
225
|
0 |
0 |
if system $$self{'mailRelayDatabaseCommand'} |
|
230
|
0 |
0 |
if ($$self{'mailProgramRestart'}) |
|
232
|
0 |
0 |
if $Mail::POPRelay::DEBUG |