| blib/lib/Mail/SRS/Guarded.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 12 | 14 | 85.7 |
| line | true | false | branch |
|---|---|---|---|
| 47 | 5 | 70 | if ($senduser =~ s/$Mail::SRS::Guarded::SRS1RE//io) { } |
| 37 | 33 | elsif ($senduser =~ s/$Mail::SRS::Guarded::SRS0RE/$1/io) { } | |
| 82 | 40 | 37 | if ($user =~ s/$Mail::SRS::Guarded::SRS1RE//io) |
| 86 | 2 | 38 | if ($hash =~ /\./) { } |
| 87 | 1 | 1 | unless $$self{'AllowUnsafeSrs'} |
| 95 | 0 | 38 | unless ($self->hash_verify($hash, $srshost, $srsuser)) |
| 100 | 0 | 39 | unless (defined $srshost and defined $srsuser) |