SA 4.0.1 - DMARC plugin

[Mateusz Krawczyk]

Hello,

after updating SA 4.0.0 to 4.0.1, (CentOS 7 - Perl version 5.16.3) I get
the following message in log regarding the DMARC plugin:

plugin: eval failed: Can't use an undefined value as an ARRAY reference at
/usr/share/perl5/Mail/SpamAssassin/Plugin/DMARC.pm line 336.

File "DMARC.pm":

my $dmarc_arc_verified = 0;
  if (($result->result ne 'pass') and (ref($pms->{arc_verifier}) and
($pms->{arc_verifier}->result))) {
    undef $result;
    $dmarc_arc_verified = 1;
    # if DMARC fails retry by reading data from AAR headers
    # use Mail::SpamAssassin::Plugin::AuthRes if available to read ARC
signature details
*    my @spf_parsed = sort { ( $a->{authres_parsed}{spf}{arc_index} // 0 )
<=> ( $b->{authres_parsed}{spf}{arc_index} // 0 ) }
@{$pms->{authres_parsed}{spf}};*
    my $old_arc_index = 0;

Any ideas how to solve it ?

Regards,
Mateusz