Script 'mail_helper' called by obssrc Hello community, here is the log from the commit of package perl-Mail-DKIM for openSUSE:Factory checked in at 2023-09-13 20:43:18 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Mail-DKIM (Old) and /work/SRC/openSUSE:Factory/.perl-Mail-DKIM.new.1766 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Mail-DKIM" Wed Sep 13 20:43:18 2023 rev:33 rq:1110600 version:1.20230911 Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Mail-DKIM/perl-Mail-DKIM.changes 2023-07-12 17:26:40.986260660 +0200 +++ /work/SRC/openSUSE:Factory/.perl-Mail-DKIM.new.1766/perl-Mail-DKIM.changes 2023-09-13 20:43:28.647762793 +0200 @@ -1,0 +2,9 @@ +Mon Sep 11 03:08:25 UTC 2023 - Tina Müller <timueller+p...@suse.de> + +- updated to 1.20230911 + see /usr/share/doc/packages/perl-Mail-DKIM/Changes + + 1.20230911 2023-09-11 UTC + * Option to add custom tags to generated ARC signatures and seals + +------------------------------------------------------------------- Old: ---- Mail-DKIM-1.20230630.tar.gz New: ---- Mail-DKIM-1.20230911.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Mail-DKIM.spec ++++++ --- /var/tmp/diff_new_pack.dAAZRl/_old 2023-09-13 20:43:29.867806167 +0200 +++ /var/tmp/diff_new_pack.dAAZRl/_new 2023-09-13 20:43:29.867806167 +0200 @@ -18,7 +18,7 @@ %define cpan_name Mail-DKIM Name: perl-Mail-DKIM -Version: 1.20230630 +Version: 1.20230911 Release: 0 License: Artistic-1.0 OR GPL-1.0-or-later Summary: Signs/verifies Internet mail with DKIM/DomainKey signatures ++++++ Mail-DKIM-1.20230630.tar.gz -> Mail-DKIM-1.20230911.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/Changes new/Mail-DKIM-1.20230911/Changes --- old/Mail-DKIM-1.20230630/Changes 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/Changes 2023-09-11 03:30:42.000000000 +0200 @@ -1,5 +1,8 @@ This file summarizes what's changed between releases of Mail-DKIM. +1.20230911 2023-09-11 UTC + * Option to add custom tags to generated ARC signatures and seals + 1.20230630 2023-06-30 UTC * Add support for Ed25519 signature types Thanks to Matthäus Wander @mwander diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/META.json new/Mail-DKIM-1.20230911/META.json --- old/Mail-DKIM-1.20230630/META.json 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/META.json 2023-09-11 03:30:42.000000000 +0200 @@ -68,7 +68,7 @@ "web" : "https://github.com/fastmail/mail-dkim/" } }, - "version" : "1.20230630", + "version" : "1.20230911", "x_contributors" : [ "Aaron Thompson <d...@aaront.org>", "Bron Gondwana <br...@fastmail.fm>", diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/META.yml new/Mail-DKIM-1.20230911/META.yml --- old/Mail-DKIM-1.20230630/META.yml 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/META.yml 2023-09-11 03:30:42.000000000 +0200 @@ -37,7 +37,7 @@ resources: bugtracker: https://github.com/fastmail/mail-dkim/issues repository: git://github.com/fastmail/mail-dkim.git -version: '1.20230630' +version: '1.20230911' x_contributors: - 'Aaron Thompson <d...@aaront.org>' - 'Bron Gondwana <br...@fastmail.fm>' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/Makefile.PL new/Mail-DKIM-1.20230911/Makefile.PL --- old/Mail-DKIM-1.20230630/Makefile.PL 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/Makefile.PL 2023-09-11 03:30:42.000000000 +0200 @@ -40,7 +40,7 @@ "YAML::XS" => 0, "lib" => 0 }, - "VERSION" => "1.20230630", + "VERSION" => "1.20230911", "test" => { "TESTS" => "t/*.t" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/README new/Mail-DKIM-1.20230911/README --- old/Mail-DKIM-1.20230630/README 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/README 2023-09-11 03:30:42.000000000 +0200 @@ -1,5 +1,5 @@ This archive contains the distribution Mail-DKIM, -version 1.20230630: +version 1.20230911: Signs/verifies Internet mail with DKIM/DomainKey signatures diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/ARC/MessageSignature.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/ARC/MessageSignature.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/ARC/MessageSignature.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/ARC/MessageSignature.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::ARC::MessageSignature; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: Subclass of Mail::DKIM::Signature which represents a ARC-Message-Signature header # Copyright 2017 FastMail Pty Ltd. All Rights Reserved. @@ -30,6 +30,7 @@ $self->selector( $prms{'Selector'} ); $self->timestamp( $prms{'Timestamp'} ) if defined $prms{'Timestamp'}; $self->expiration( $prms{'Expiration'} ) if defined $prms{'Expiration'}; + $self->tags( $prms{'Tags'} ) if defined $prms{'Tags'}; $self->key( $prms{'Key'} ) if defined $prms{'Key'}; return $self; @@ -69,7 +70,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 CONSTRUCTORS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/ARC/Seal.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/ARC/Seal.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/ARC/Seal.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/ARC/Seal.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::ARC::Seal; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: represents a ARC-Seal header # Copyright 2017 FastMail Pty Ltd. All Rights Reserved. @@ -29,6 +29,7 @@ $self->timestamp( defined $prms{'Timestamp'} ? $prms{'Timestamp'} : time() ); $self->expiration( $prms{'Expiration'} ) if defined $prms{'Expiration'}; + $self->tags( $prms{'Tags'} ) if defined $prms{'Tags'}; $self->key( $prms{'Key'} ) if defined $prms{'Key'}; return $self; @@ -76,7 +77,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 CONSTRUCTORS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/ARC/Signer.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/ARC/Signer.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/ARC/Signer.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/ARC/Signer.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::ARC::Signer; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: generates a DKIM signature for a message # Copyright 2017 FastMail Pty Ltd. All Rights Reserved. @@ -248,6 +248,10 @@ KeyFile => $self->{KeyFile}, ( $self->{Timestamp} ? ( Timestamp => $self->{Timestamp} ) : () ), ( $self->{Expiration} ? ( Expiration => $self->{Expiration} ) : () ), + ( + $self->{'Tags'} ? ( Tags => $self->{'Tags'} ) + : () + ), ) ); @@ -314,6 +318,11 @@ KeyFile => $self->{KeyFile}, ( $self->{Timestamp} ? ( Timestamp => $self->{Timestamp} ) : () ), ( $self->{Expiration} ? ( Expiration => $self->{Expiration} ) : () ), + ( + $self->{'SealTags'} ? ( Tags => $self->{'SealTags'} ) + : () + ), + ) ); @@ -594,7 +603,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 SYNOPSIS @@ -729,6 +738,16 @@ List-Id List-Help List-Unsubscribe List-Subscribe List-Post List-Owner List-Archive +=item Tags + +An optional hashref of additional tags to be added to the ARC +signature generated. + +=item SealTags + +An optional hashref of additional tags to be added to the ARC +seal generated. + =back =head1 METHODS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/ARC/Verifier.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/ARC/Verifier.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/ARC/Verifier.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/ARC/Verifier.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::ARC::Verifier; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: verifies an ARC-Sealed message # Copyright 2017 FastMail Pty Ltd. All Rights Reserved. @@ -621,7 +621,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 SYNOPSIS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Algorithm/Base.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Algorithm/Base.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Algorithm/Base.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Algorithm/Base.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::Algorithm::Base; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: base class for DKIM "algorithms" # Copyright 2005-2007 Messiah College. All rights reserved. @@ -187,7 +187,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 SYNOPSIS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Algorithm/dk_rsa_sha1.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Algorithm/dk_rsa_sha1.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Algorithm/dk_rsa_sha1.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Algorithm/dk_rsa_sha1.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::Algorithm::dk_rsa_sha1; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: Base algorithm class # Copyright 2005-2006 Messiah College. All rights reserved. @@ -134,7 +134,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 AUTHORS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Algorithm/ed25519_sha256.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Algorithm/ed25519_sha256.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Algorithm/ed25519_sha256.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Algorithm/ed25519_sha256.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::Algorithm::ed25519_sha256; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: ed25519 sha256 algorithm class # Copyright 2005-2006 Messiah College. All rights reserved. @@ -67,7 +67,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 AUTHORS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Algorithm/rsa_sha1.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Algorithm/rsa_sha1.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Algorithm/rsa_sha1.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Algorithm/rsa_sha1.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::Algorithm::rsa_sha1; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: rsa sha1 algorithm class # Copyright 2005-2006 Messiah College. All rights reserved. @@ -66,7 +66,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 AUTHORS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Algorithm/rsa_sha256.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Algorithm/rsa_sha256.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Algorithm/rsa_sha256.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Algorithm/rsa_sha256.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::Algorithm::rsa_sha256; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: rsa sha256 algorithm class # Copyright 2005-2006 Messiah College. All rights reserved. @@ -66,7 +66,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 AUTHORS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/AuthorDomainPolicy.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/AuthorDomainPolicy.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/AuthorDomainPolicy.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/AuthorDomainPolicy.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::AuthorDomainPolicy; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: represents an Author Domain Signing Practices (ADSP) record # Copyright 2005-2009 Messiah College. @@ -195,7 +195,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Canonicalization/Base.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Canonicalization/Base.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Canonicalization/Base.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Canonicalization/Base.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::Canonicalization::Base; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: base class for canonicalization methods # Copyright 2005-2007 Messiah College. All rights reserved. @@ -85,7 +85,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 SYNOPSIS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Canonicalization/DkCommon.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Canonicalization/DkCommon.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Canonicalization/DkCommon.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Canonicalization/DkCommon.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::Canonicalization::DkCommon; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: dk common canonicalization # Copyright 2005-2006 Messiah College. All rights reserved. @@ -150,7 +150,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 AUTHORS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Canonicalization/DkimCommon.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Canonicalization/DkimCommon.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Canonicalization/DkimCommon.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Canonicalization/DkimCommon.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::Canonicalization::DkimCommon; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: common canonicalization # Copyright 2005-2007 Messiah College. All rights reserved. @@ -144,7 +144,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Canonicalization/dk_nofws.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Canonicalization/dk_nofws.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Canonicalization/dk_nofws.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Canonicalization/dk_nofws.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::Canonicalization::dk_nofws; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: nofws canonicalization # Copyright 2005-2006 Messiah College. All rights reserved. @@ -45,7 +45,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 AUTHORS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Canonicalization/dk_simple.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Canonicalization/dk_simple.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Canonicalization/dk_simple.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Canonicalization/dk_simple.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::Canonicalization::dk_simple; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: dk simple canonicalization # Copyright 2005 Messiah College. All rights reserved. @@ -75,7 +75,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 AUTHORS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Canonicalization/nowsp.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Canonicalization/nowsp.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Canonicalization/nowsp.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Canonicalization/nowsp.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::Canonicalization::nowsp; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: nowsp canonicalization # Copyright 2005 Messiah College. All rights reserved. @@ -57,7 +57,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 AUTHORS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Canonicalization/relaxed.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Canonicalization/relaxed.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Canonicalization/relaxed.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Canonicalization/relaxed.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::Canonicalization::relaxed; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: common canonicalization # Copyright 2005 Messiah College. All rights reserved. @@ -123,7 +123,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 AUTHORS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Canonicalization/seal.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Canonicalization/seal.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Canonicalization/seal.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Canonicalization/seal.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::Canonicalization::seal; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: arc seal canonicalization # Copyright 2017 FastMail Pty Ltd. All Rights Reserved. @@ -116,7 +116,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 AUTHORS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Canonicalization/simple.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Canonicalization/simple.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Canonicalization/simple.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Canonicalization/simple.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::Canonicalization::simple; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: simple canonicalization # Copyright 2005 Messiah College. All rights reserved. @@ -96,7 +96,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 AUTHORS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Common.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Common.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Common.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Common.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::Common; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: Common class for Mail::DKIM # Copyright 2005-2007 Messiah College. All rights reserved. @@ -181,7 +181,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 AUTHORS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/DNS.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/DNS.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/DNS.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/DNS.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::DNS; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: performs DNS queries for Mail::DKIM # Copyright 2007, 2012 Messiah College. All rights reserved. @@ -184,7 +184,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/DkPolicy.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/DkPolicy.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/DkPolicy.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/DkPolicy.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::DkPolicy; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: represents a DomainKeys Sender Signing Policy record # Copyright 2005-2009 Messiah College. @@ -172,7 +172,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/DkSignature.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/DkSignature.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/DkSignature.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/DkSignature.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::DkSignature; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: represents a DomainKeys-Signature header # Copyright 2005-2006 Messiah College. All rights reserved. @@ -252,7 +252,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 CONSTRUCTORS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/DkimPolicy.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/DkimPolicy.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/DkimPolicy.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/DkimPolicy.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::DkimPolicy; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: represents a DKIM Sender Signing Practices record # Copyright 2005-2007 Messiah College. @@ -193,7 +193,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Key.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Key.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Key.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Key.pm 2023-09-11 03:30:42.000000000 +0200 @@ -2,7 +2,7 @@ use strict; use warnings; # ABSTRACT: Represents a DKIM Key -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # Copyright 2006 Jason Long. All rights reserved. # @@ -101,7 +101,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 AUTHORS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/KeyValueList.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/KeyValueList.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/KeyValueList.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/KeyValueList.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::KeyValueList; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: Represents a Key/Value list # Copyright 2005-2007 Messiah College. All rights reserved. @@ -195,7 +195,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 AUTHORS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/MessageParser.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/MessageParser.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/MessageParser.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/MessageParser.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::MessageParser; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: Signs/verifies Internet mail with DKIM/DomainKey signatures # Copyright 2005 Messiah College. All rights reserved. @@ -142,7 +142,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 AUTHORS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Policy.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Policy.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Policy.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Policy.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::Policy; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: abstract base class for originator "signing" policies # Copyright 2005-2007 Messiah College. @@ -162,7 +162,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 SYNOPSIS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/PrivateKey.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/PrivateKey.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/PrivateKey.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/PrivateKey.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::PrivateKey; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: a private key loaded in memory for DKIM signing # Copyright 2005-2007 Messiah College. All rights reserved. @@ -195,7 +195,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 SYNOPSIS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/PublicKey.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/PublicKey.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/PublicKey.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/PublicKey.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::PublicKey; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: Represents a DKIM key # Copyright 2005 Messiah College. All rights reserved. @@ -522,7 +522,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 CONSTRUCTOR diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Signature.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Signature.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Signature.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Signature.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::Signature; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: represents a DKIM-Signature header # Copyright 2005-2007 Messiah College. All rights reserved. @@ -616,7 +616,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 CONSTRUCTORS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Signer.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Signer.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Signer.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Signer.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::Signer; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: generates a DKIM signature for a message # Copyright 2005-2007 Messiah College. All rights reserved. @@ -132,7 +132,7 @@ die 'invalid method property'; } unless ( $self->{'Domain'} ) { - die 'invalid header property'; + die 'invalid domain property'; } unless ( $self->{'Selector'} ) { die 'invalid selector property'; @@ -440,7 +440,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 SYNOPSIS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/SignerPolicy.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/SignerPolicy.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/SignerPolicy.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/SignerPolicy.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::SignerPolicy; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: determines signing parameters for a message # Copyright 2005-2006 Messiah College. All rights reserved. @@ -24,7 +24,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/TextWrap.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/TextWrap.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/TextWrap.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/TextWrap.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::TextWrap; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: text wrapping module written for use with DKIM use Carp; @@ -176,7 +176,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 DESCRIPTION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Verifier.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Verifier.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM/Verifier.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM/Verifier.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM::Verifier; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: verifies a DKIM-signed message # Copyright 2005-2009 Messiah College. All rights reserved. @@ -500,7 +500,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 SYNOPSIS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/lib/Mail/DKIM.pm new/Mail-DKIM-1.20230911/lib/Mail/DKIM.pm --- old/Mail-DKIM-1.20230630/lib/Mail/DKIM.pm 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/lib/Mail/DKIM.pm 2023-09-11 03:30:42.000000000 +0200 @@ -1,7 +1,7 @@ package Mail::DKIM; use strict; use warnings; -our $VERSION = '1.20230630'; # VERSION +our $VERSION = '1.20230911'; # VERSION # ABSTRACT: Signs/verifies Internet mail with DKIM/DomainKey signatures #require 5.010; @@ -23,7 +23,7 @@ =head1 VERSION -version 1.20230630 +version 1.20230911 =head1 SYNOPSIS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/scripts/arcsign.pl new/Mail-DKIM-1.20230911/scripts/arcsign.pl --- old/Mail-DKIM-1.20230630/scripts/arcsign.pl 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/scripts/arcsign.pl 2023-09-11 03:30:42.000000000 +0200 @@ -18,11 +18,13 @@ "%c %o < original_email.txt", [ "selector=s" => "Signing selector", {default=>'selector1'} ], [ "domain=s" => "Signing domain" ], - [ "algorithm=s" => "Algorithm to sign with", {default=>"sha-256"} ], + [ "algorithm=s" => "Algorithm to sign with", {default=>"rsa-sha256"} ], [ "srvid=s" => "Authentication-Results server domain, defaults to signing domain" ], [ "chain=s" => "Chain value. 'ar' means pick it up from Authentication-Results header", {default=>"ar"} ], [ "key=s" => "File containing private key, without BEGIN or END lines.", {default=>"private.key"} ], [ "debug-canonicalization=s" => "Outputs the canonicalized message to the specified file in addition to computing the DKIM signature. This is helpful for debugging canonicalization methods." ], + [ "extra-tag=s@" => "Extra tags to use in signing" ], + [ "extra-seal-tag=s@" => "Extra tags to use in sealing" ], [ "timestamp=i" => "Timestamp to sign with, default to now", {default=>time} ], [ "binary" => "Read input in binary mode" ], [ "wrap" => "Wrap original email" ], @@ -38,50 +40,66 @@ eval "use Mail::DKIM::TextWrap;" if($opt->wrap); my $debugfh; -if (defined $opt->debug_canonicalization) -{ - open $debugfh, ">", $opt->debug_canonicalization - or die "Error: cannot write ".$opt->debug_canonicalization.": $!\n"; -} -if ($opt->binary) -{ - binmode STDIN; +if (defined $opt->debug_canonicalization) { + open $debugfh, ">", $opt->debug_canonicalization + or die "Error: cannot write ".$opt->debug_canonicalization.": $!\n"; +} +if ($opt->binary) { + binmode STDIN; +} + +my %arc_opt; +if ($opt->extra_tag) { + $arc_opt{Tags} = {}; + for my $extra ($opt->extra_tag->@*) { + my ($n, $v) = split /=/, $extra, 2; + $arc_opt{Tags}->{$n} = $v; + } +} +if ($opt->extra_seal_tag) { + $arc_opt{SealTags} = {}; + for my $extra ($opt->extra_seal_tag->@*) { + my ($n, $v) = split /=/, $extra, 2; + $arc_opt{SealTags}->{$n} = $v; + } } my $arc = new Mail::DKIM::ARC::Signer( - Domain => $opt->domain, - SrvId => $opt->srvid, - Chain => $opt->chain, - Algorithm => $opt->algorithm, - Selector => $opt->selector, - KeyFile => $opt->key, - Debug_Canonicalization => $debugfh, - Timestamp => $opt->timestamp - ); + Domain => $opt->domain, + SrvId => $opt->srvid, + Chain => $opt->chain, + Algorithm => $opt->algorithm, + Selector => $opt->selector, + KeyFile => $opt->key, + Debug_Canonicalization => $debugfh, + Timestamp => $opt->timestamp, + %arc_opt, +); + + while (<STDIN>) { - unless ($opt->binary) - { - chomp $_; - s/\015?$/\015\012/s; - } - $arc->PRINT($_); + unless ($opt->binary) { + chomp $_; + s/\015?$/\015\012/s; + } + $arc->PRINT($_); } $arc->CLOSE; if ($debugfh) { - close $debugfh; - print STDERR "wrote canonicalized message to ".$opt->debug_canonicalization."\n"; + close $debugfh; + print STDERR "wrote canonicalized message to ".$opt->debug_canonicalization."\n"; } print "RESULT IS " . $arc->result() . "\n"; if( $arc->result eq "sealed") { - print join("\n",$arc->as_strings) . "\n"; + print join("\n",$arc->as_strings) . "\n"; } else { - print "REASON IS " . $arc->{details} . "\n"; + print "REASON IS " . $arc->{details} . "\n"; } __END__ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mail-DKIM-1.20230630/scripts/dkimsign.pl new/Mail-DKIM-1.20230911/scripts/dkimsign.pl --- old/Mail-DKIM-1.20230630/scripts/dkimsign.pl 2023-06-30 02:03:40.000000000 +0200 +++ new/Mail-DKIM-1.20230911/scripts/dkimsign.pl 2023-09-11 03:30:42.000000000 +0200 @@ -100,12 +100,11 @@ defined($opt->identity) ? (Identity => $opt->identity) : (), ); $sig->protocol($opt->key_protocol) if defined $opt->key_protocol; - if ($opt->extra_tag) { - foreach my $extra ($opt->extra_tag->@*) - { - my ($n, $v) = split /=/, $extra, 2; - $sig->set_tag($n, $v); - } + if ($opt->extra_tag) { + foreach my $extra ($opt->extra_tag->@*) { + my ($n, $v) = split /=/, $extra, 2; + $sig->set_tag($n, $v); + } } $dkim->add_signature($sig); return;