| line |
true |
false |
branch |
|
172
|
10 |
25 |
if ($class eq 'Mail::SRS') |
|
177
|
1 |
24 |
$#_ == 0 ? : |
|
178
|
24 |
1 |
unless ref $$self{'Secret'} eq 'ARRAY' |
|
180
|
25 |
0 |
unless $$self{'MaxAge'} |
|
181
|
25 |
0 |
unless $$self{'HashLength'} |
|
182
|
25 |
0 |
unless $$self{'HashMin'} |
|
183
|
9 |
16 |
unless exists $$self{'Separator'} |
|
184
|
1 |
24 |
unless ($$self{'Separator'} =~ /^[-+=]$/) |
|
206
|
0 |
137 |
unless $sender =~ /^(.*)\@([^\@]+)$/ |
|
209
|
0 |
137 |
if $senduser =~ /\@/ |
|
212
|
137 |
0 |
if ($alias =~ /^(.*)\@([^\@]+)$/) |
|
217
|
8 |
129 |
if (lc $aliashost eq lc $sendhost) |
|
218
|
4 |
4 |
unless $$self{'AlwaysRewrite'} |
|
237
|
1 |
135 |
unless $address =~ /^(.*)\@([^\@])+$/ |
|
241
|
1 |
134 |
if $@ |
|
313
|
93 |
8 |
unless defined $time |
|
338
|
5 |
100 |
if $$self{'IgnoreTimestamp'} |
|
347
|
97 |
3 |
if $now <= $time + $$self{'MaxAge'} |
|
361
|
0 |
0 |
if time <= $time + $$self{'MaxAge'} * $PRECISION |
|
380
|
0 |
134 |
unless @secret |
|
401
|
0 |
136 |
unless length $hash >= $$self{'HashMin'} |
|
403
|
0 |
136 |
unless @secret |
|
415
|
112 |
26 |
if $valid eq $hash |
|
420
|
22 |
4 |
if ($hash eq lc $_) |