diff options
| author | Alexander Sulfrian <alex@spline.inf.fu-berlin.de> | 2020-08-25 17:42:08 +0200 |
|---|---|---|
| committer | Alexander Sulfrian <alex@spline.inf.fu-berlin.de> | 2020-08-25 17:42:08 +0200 |
| commit | 38bf8b644a50320747712a223cdd5559aabfa2cf (patch) | |
| tree | 74e25a08fbf4327cdc79d7a76a0cf85b4f40efb7 | |
| parent | b27431c79bfb6d6284e6079b9c1104a44af24775 (diff) | |
| download | dmarc-master.tar.gz dmarc-master.tar.bz2 dmarc-master.zip | |
Email::Address::XS is already a dependency of Mail::DMARC, so we do not
need an additional dependency.
| -rw-r--r-- | Spline/DMARC.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Spline/DMARC.pm b/Spline/DMARC.pm index 1cea9cb..4a54bbd 100644 --- a/Spline/DMARC.pm +++ b/Spline/DMARC.pm @@ -22,7 +22,7 @@ use strict; use warnings; use Mail::DMARC::PurePerl; -use Email::Address; +use Email::Address::XS; use Spline::Log qw(info debug); use base 'Exporter'; @@ -105,7 +105,7 @@ returns 1. If there is no policy or a policy with any other value then sub check_addresses($) { my $from = shift; - my @addresses = Email::Address->parse($from); + my @addresses = Email::Address::XS->parse($from); foreach my $addr (@addresses) { my $policy = get_dmarc_policy($addr->host); if ($policy eq 'reject') { |