Script 'mail_helper' called by obssrc Hello community, here is the log from the commit of package perl-Crypt-DES for openSUSE:Factory checked in at 2026-08-22 21:34:46 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Crypt-DES (Old) and /work/SRC/openSUSE:Factory/.perl-Crypt-DES.new.1258 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Crypt-DES" Sat Aug 22 21:34:46 2026 rev:26 rq:1372850 version:2.90.0 Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Crypt-DES/perl-Crypt-DES.changes 2024-05-14 13:37:31.176744373 +0200 +++ /work/SRC/openSUSE:Factory/.perl-Crypt-DES.new.1258/perl-Crypt-DES.changes 2026-08-22 21:36:19.991604609 +0200 @@ -1,0 +2,16 @@ +Fri Aug 21 12:28:44 UTC 2026 - Tina Müller <[email protected]> + +- Remove perl-Crypt-DES-gcc14.patch (fixed upstream) + +------------------------------------------------------------------- +Tue Aug 18 16:13:21 UTC 2026 - Tina Müller <[email protected]> + +- Add cpanspec.yml for overriding license + +------------------------------------------------------------------- +Tue Aug 11 06:02:55 UTC 2026 - Tina Müller <[email protected]> + +- updated to 2.90.0 (2.09) + see /usr/share/doc/packages/perl-Crypt-DES/Changes + +------------------------------------------------------------------- Old: ---- Crypt-DES-2.07.tar.gz perl-Crypt-DES-gcc14.patch New: ---- Crypt-DES-2.09.tar.gz README.md _scmsync.obsinfo build.specials.obscpio cpanspec.yml ----------(Old B)---------- Old: - Remove perl-Crypt-DES-gcc14.patch (fixed upstream) ----------(Old E)---------- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Crypt-DES.spec ++++++ --- /var/tmp/diff_new_pack.fdR3QG/_old 2026-08-22 21:36:20.994640406 +0200 +++ /var/tmp/diff_new_pack.fdR3QG/_new 2026-08-22 21:36:20.996640477 +0200 @@ -1,7 +1,7 @@ # # spec file for package perl-Crypt-DES # -# Copyright (c) 2024 SUSE LLC +# Copyright (c) 2026 SUSE LLC and contributors # # All modifications and additions to the file contributed by third parties # remain the property of their copyright owners, unless otherwise agreed @@ -16,20 +16,23 @@ # +%define cpan_name Crypt-DES Name: perl-Crypt-DES -Version: 2.07 +Version: 2.90.0 Release: 0 -%define cpan_name Crypt-DES -Summary: Perl DES encryption module +# 2.09 -> normalize -> 2.90.0 +%define cpan_version 2.09 +#Upstream: of, Eric Young ([email protected]). Other parts of the perl extension and Cross-platform work and packaging for single algorithm distribution is License: BSD-3-Clause -Group: Development/Libraries/Perl -URL: http://search.cpan.org/dist/Crypt-DES/ -Source: http://www.cpan.org/authors/id/D/DP/DPARIS/%{cpan_name}-%{version}.tar.gz -# fix build with gcc14 -Patch0: perl-Crypt-DES-gcc14.patch -BuildRoot: %{_tmppath}/%{name}-%{version}-build +Summary: Perl DES encryption module +URL: https://metacpan.org/release/%{cpan_name} +Source0: https://cpan.metacpan.org/authors/id/T/TI/TIMLEGGE/%{cpan_name}-%{cpan_version}.tar.gz +Source1: cpanspec.yml +Source100: README.md BuildRequires: perl BuildRequires: perl-macros +Provides: perl(Crypt::DES) = %{version} +%undefine __perllib_provides %{perl_requires} %description @@ -37,20 +40,24 @@ methods * blocksize - =item keysize - =item encrypt - =item decrypt + +* keysize + +* encrypt + +* decrypt %prep -%autosetup -p1 -n %{cpan_name}-%{version} -find . -type f -print0 | xargs -0 chmod 644 +%autosetup -n %{cpan_name}-%{cpan_version} -p1 + +find . -type f ! -path "*/t/*" ! -name "*.pl" ! -path "*/bin/*" ! -path "*/script/*" ! -path "*/scripts/*" ! -name "configure" -print0 | xargs -0 chmod 644 %build -%{__perl} Makefile.PL INSTALLDIRS=vendor OPTIMIZE="%{optflags}" -%{__make} %{?_smp_mflags} +perl Makefile.PL INSTALLDIRS=vendor OPTIMIZE="%{optflags}" +%make_build %check -%{__make} test +make test %install %perl_make_install @@ -58,6 +65,5 @@ %perl_gen_filelist %files -f %{name}.files -%defattr(-,root,root,755) -%doc COPYRIGHT README +%doc Changes COPYRIGHT README SECURITY.md ++++++ Crypt-DES-2.07.tar.gz -> Crypt-DES-2.09.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Crypt-DES-2.07/Changes new/Crypt-DES-2.09/Changes --- old/Crypt-DES-2.07/Changes 1970-01-01 01:00:00.000000000 +0100 +++ new/Crypt-DES-2.09/Changes 2026-08-11 00:39:08.000000000 +0200 @@ -0,0 +1,99 @@ +Revision history for Crypt-DES + +2.09 2026-08-10 + [Significant Changes since 2.08] + - Essentially 2.08-TRIAL with minor documentation and test updates + - Add a Security Considerations section to the pod + - Clarify module recommendations + - Move new Module::Whatever to Module::Whatever->new() in pod and tests + + [Detailed Changes] + - 6d8a719 Increment the version for a release + - 8aa5583 Update .gitignore + - e4255e8 Update README + - bfc70b5 Add a Security Considerations section and clarifiy recommendations + - 6f3c622 Modernize module new() in tests + - 061b73a Fix over item back pod with blank lines + - cefb17d Modernize new() calling and fix missing SYNOPSIS + - 40eb31b Add a Changes file + +2.08 2026-08-08 + + [Significant Changes since 2.07] + - New Maintainer (TIMLEGGE) + - Fixes failure to build on newer GCC with implicit-function-declaration + - Add Security Policy (DES is insecure) + - Minor packaging updates + + [Detailed Changes] + - 76a27cd Update/reformat MANIFEST Changes, META.json and SECURITY.md added + - 6cc5f6a Add .gitignore file + - 9578c62 Regenerate META.yml + - 35fb123 Add links for github code repo and issues + - 1b3a375 Increment version number + - c8d74aa Add a Security Policy + - 19dd1d0 Fix RT#133363 and RT#133412 fails to build with implicit-function-declaration + - 9cba1a9 Import Crypt-DES-2.07 from CPAN + +Note: The change details below were generated with the assistance of AI. +In most cases the wording is direct from the updates in various parts +of the code, README or pod. While I have attempted to ensure its accuracy +by reviewing the diffs between the versions myself, it should be considered +informational only and may have inaccuracies. Should you be concerned +about the history of this module prior to 2.08 you will need to review +the diffs between released versions manually. + +2.07 2013-07-23 + - Fixed malformed META.yml. + - test.pl $VERSION resynced with DES.pm (was left at 2.05). + +2.06 2013-07-23 + - Fixed use of SvUPGRADE as an rvalue, which broke the build under + Perl 5.18; now called as a statement. + - Regenerated META.yml; + +2.05 2005-12-08 + - Renamed the XS entry points from des_* to _des_* (XS PREFIX and + _des.h prototypes), the 2.04 header rename having failed to fix + the Solaris symbol clash. + +2.04 2005-12-08 + - Renamed des.h to _des.h to avoid clashing with the system DES + header on Solaris. + - Added META.yml. + +2.03 2000-12-05 + - Restored "require DynaLoader", missing since 2.00 although + DynaLoader was still listed in @ISA. + - Dropped the stray "package DES;" so blocksize/keysize/new/ + encrypt/decrypt are defined in Crypt::DES itself. + - bootstrap now version-checks against $VERSION. + - Declared globals with "use vars". + - Documentation: describe the interface as Crypt::CBC's rather + than Crypt::BlockCipher's. + + (2.02 was never released to CPAN.) + +2.01 2000-09-11 + - Removed a stray #include <stdio.h> from _des.c. + - Comment and dead-code cleanup in DES.pm and test.pl. + +2.00 2000-09-11 + - Maintenance taken over by Dave Paris / W3Works, LLC. + - Portability rewrite: builds on big-endian machines and on many + more x86 platforms; local i8/i32 typedefs replace the u_int*_t + types, and PL_sv_undef is handled for newer perls. + - Renamed the internal DES routines to perl_des_* and des.c to + _des.c, resolving the des_SPtrans symbol clash with mod_ssl + (reported by Jan 'Kozo' Vajda). + - POD folded from DES.pod into DES.pm; README added. + - Makefile.PL requires Perl 5.004 and takes VERSION_FROM DES.pm. + - Expanded tests + +1.01 1999-06-07 + - Include <sys/types.h> instead of <machine/types.h>. + - Adjusted library paths so installation via "perl -MCPAN" works. + +1.0 1996-05-22 + - First release, by Gary Howland; DES implementation by Eric Young, + Perl extension by Systemics Ltd. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Crypt-DES-2.07/DES.pm new/Crypt-DES-2.09/DES.pm --- old/Crypt-DES-2.07/DES.pm 2013-07-23 22:41:38.000000000 +0200 +++ new/Crypt-DES-2.09/DES.pm 2026-08-11 00:33:10.000000000 +0200 @@ -19,7 +19,7 @@ # Other items we are prepared to export if requested @EXPORT_OK = qw(); -$VERSION = '2.07'; +$VERSION = '2.09'; bootstrap Crypt::DES $VERSION; use strict; @@ -75,8 +75,11 @@ =head1 SYNOPSIS - use Crypt::DES; - + use Crypt::DES; + my $key = pack("H16", "0123456789ABCDEF"); + my $cipher = Crypt::DES->new($key); + my $ciphertext = $cipher->encrypt($plaintext); + my $plaintext = $cipher->decrypt($ciphertext); =head1 DESCRIPTION @@ -86,8 +89,11 @@ =over 4 =item blocksize + =item keysize + =item encrypt + =item decrypt =back @@ -106,14 +112,14 @@ =item new - my $cipher = new Crypt::DES $key; + my $cipher = Crypt::DES->new($key); This creates a new Crypt::DES BlockCipher object, using $key, where $key is a key of C<keysize()> bytes. =item encrypt - my $cipher = new Crypt::DES $key; + my $cipher = Crypt::DES->new($key); my $ciphertext = $cipher->encrypt($plaintext); This function encrypts $plaintext and returns the $ciphertext @@ -121,7 +127,7 @@ =item decrypt - my $cipher = new Crypt::DES $key; + my $cipher = Crypt::DES->new($key); my $plaintext = $cipher->decrypt($ciphertext); This function decrypts $ciphertext and returns the $plaintext @@ -129,12 +135,22 @@ =back +=head1 Security Considerations + +This module is not deprecated as there may still be a reason to +encrypt and decrypt using DES. However, DES is known to be weak. +In 2026 a standard laptop can brute-force a DES key in a few +days. B<DO NOT use DES (or this module) with any expectation of +security>. + =head1 EXAMPLE my $key = pack("H16", "0123456789ABCDEF"); - my $cipher = new Crypt::DES $key; + my $cipher = Crypt::DES->new($key); my $ciphertext = $cipher->encrypt("plaintex"); # NB - 8 bytes print unpack("H16", $ciphertext), "\n"; + my $plaintext = $cipher->decrypt($ciphertext); + print $plaintext, "\n"; =head1 NOTES @@ -144,11 +160,14 @@ Crypt::CBC documentation for proper syntax and use. Also note that the DES algorithm is, by today's standard, weak -encryption. Crypt::Blowfish is highly recommended if you're -interested in using strong encryption and a faster algorithm. +encryption. CryptX (Crypt::Cipher::AES) is recommended if you +want to replace Crypt::DES in a Crypt::CBC use case. Otherwise, +replacing it with something like Crypt::AuthEnc::GCM would be +recommended. =head1 SEE ALSO +Crypt::AuthEnc::GCM Crypt::Blowfish Crypt::IDEA @@ -169,4 +188,7 @@ This single-algorithm package and cross-platform code is maintained by Dave Paris <[email protected]>. +Timothy Legge <[email protected]> started maintaining +this module as of version 2.08. + =cut diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Crypt-DES-2.07/MANIFEST new/Crypt-DES-2.09/MANIFEST --- old/Crypt-DES-2.07/MANIFEST 2005-12-08 13:24:50.000000000 +0100 +++ new/Crypt-DES-2.09/MANIFEST 2026-08-09 02:05:04.000000000 +0200 @@ -1,11 +1,14 @@ +_des.c +_des.h +Changes COPYRIGHT DES.pm DES.xs +Makefile.PL MANIFEST +META.json Module JSON meta-data (added by MakeMaker) +META.yml Module meta-data (added by MakeMaker) README -Makefile.PL -_des.c -_des.h +SECURITY.md test.pl typemap -META.yml Module meta-data (added by MakeMaker) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Crypt-DES-2.07/META.json new/Crypt-DES-2.09/META.json --- old/Crypt-DES-2.07/META.json 1970-01-01 01:00:00.000000000 +0100 +++ new/Crypt-DES-2.09/META.json 2026-08-11 00:39:33.000000000 +0200 @@ -0,0 +1,47 @@ +{ + "abstract" : "unknown", + "author" : [ + "unknown" + ], + "dynamic_config" : 1, + "generated_by" : "ExtUtils::MakeMaker version 7.78, CPAN::Meta::Converter version 2.150013", + "license" : [ + "unknown" + ], + "meta-spec" : { + "url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec";, + "version" : 2 + }, + "name" : "Crypt-DES", + "no_index" : { + "directory" : [ + "t", + "inc" + ] + }, + "prereqs" : { + "build" : { + "requires" : { + "ExtUtils::MakeMaker" : "0" + } + }, + "configure" : { + "requires" : { + "ExtUtils::MakeMaker" : "0" + } + } + }, + "release_status" : "stable", + "resources" : { + "bugtracker" : { + "web" : "https://github.com/timlegge/perl-Crypt-DES/issues"; + }, + "repository" : { + "type" : "git", + "url" : "git://github.com/timlegge/perl-Crypt-DES.git", + "web" : "https://github.com/timlegge/perl-Crypt-DES"; + } + }, + "version" : "2.09", + "x_serialization_backend" : "JSON::PP version 4.16" +} diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Crypt-DES-2.07/META.yml new/Crypt-DES-2.09/META.yml --- old/Crypt-DES-2.07/META.yml 2013-07-23 22:42:52.000000000 +0200 +++ new/Crypt-DES-2.09/META.yml 2026-08-11 00:39:33.000000000 +0200 @@ -1,20 +1,24 @@ ---- #YAML:1.0 -name: Crypt-DES -version: 2.07 -abstract: ~ -author: [] -license: unknown -distribution_type: module -configure_requires: - ExtUtils::MakeMaker: 0 +--- +abstract: unknown +author: + - unknown build_requires: - ExtUtils::MakeMaker: 0 -requires: {} -no_index: - directory: - - t - - inc -generated_by: ExtUtils::MakeMaker version 6.55_02 + ExtUtils::MakeMaker: '0' +configure_requires: + ExtUtils::MakeMaker: '0' +dynamic_config: 1 +generated_by: 'ExtUtils::MakeMaker version 7.78, CPAN::Meta::Converter version 2.150013' +license: unknown meta-spec: - url: http://module-build.sourceforge.net/META-spec-v1.4.html - version: 1.4 + url: http://module-build.sourceforge.net/META-spec-v1.4.html + version: '1.4' +name: Crypt-DES +no_index: + directory: + - t + - inc +resources: + bugtracker: https://github.com/timlegge/perl-Crypt-DES/issues + repository: git://github.com/timlegge/perl-Crypt-DES.git +version: '2.09' +x_serialization_backend: 'CPAN::Meta::YAML version 0.020' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Crypt-DES-2.07/Makefile.PL new/Crypt-DES-2.09/Makefile.PL --- old/Crypt-DES-2.07/Makefile.PL 2000-09-11 21:27:41.000000000 +0200 +++ new/Crypt-DES-2.09/Makefile.PL 2026-08-09 02:02:23.000000000 +0200 @@ -11,6 +11,19 @@ 'DISTNAME' => 'Crypt-DES', 'VERSION_FROM' => 'DES.pm',, 'OBJECT' => 'DES.o _des.o', - 'dist' => {COMPRESS=>'gzip', SUFFIX=>'gz'} + 'dist' => {COMPRESS=>'gzip', SUFFIX=>'gz'}, + META_MERGE => { + 'meta-spec' => { version => 2 }, + 'resources' => { + 'repository' => { + 'type' => 'git', + 'url' => 'git://github.com/timlegge/perl-Crypt-DES.git', + 'web' => 'https://github.com/timlegge/perl-Crypt-DES', + }, + 'bugtracker' => { + 'web' => 'https://github.com/timlegge/perl-Crypt-DES/issues', + }, + }, + }, ); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Crypt-DES-2.07/README new/Crypt-DES-2.09/README --- old/Crypt-DES-2.07/README 2013-07-23 22:42:40.000000000 +0200 +++ new/Crypt-DES-2.09/README 2026-08-11 00:15:42.000000000 +0200 @@ -22,6 +22,8 @@ In release 2.07, a minor bug in META.yml was fixed. +See Changes introduced in 2.08 for release information. + Prerequisites ------------- diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Crypt-DES-2.07/SECURITY.md new/Crypt-DES-2.09/SECURITY.md --- old/Crypt-DES-2.07/SECURITY.md 1970-01-01 01:00:00.000000000 +0100 +++ new/Crypt-DES-2.09/SECURITY.md 2026-08-09 00:19:54.000000000 +0200 @@ -0,0 +1,95 @@ +# Security Policy for the Crypt-DES distribution. + +Report security issues by email to Timothy Legge <[email protected]>. + +This is the Security Policy for Crypt-DES. + +This text is based on the CPAN Security Group's Guidelines for Adding +a Security Policy to Perl Distributions (version 1.3.0) +https://security.metacpan.org/docs/guides/security-policy-for-authors.html + +# How to Report a Security Vulnerability + +Security vulnerabilities can be reported to the current Crypt-DES +maintainers by email to Timothy Legge <[email protected]>. + +Please include as many details as possible, including code samples +or test cases, so that we can reproduce the issue. Check that your +report does not expose any sensitive data, such as passwords, +tokens, or personal information. + +If you would like any help with triaging the issue, or if the issue +is being actively exploited, please copy the report to the CPAN +Security Group (CPANSec) at <[email protected]>. + +Please *do not* use the public issue reporting system on RT or +GitHub issues for reporting security vulnerabilities. + +Please do not disclose the security vulnerability in public forums +until past any proposed date for public disclosure, or it has been +made public by the maintainers or CPANSec. That includes patches or +pull requests. + +For more information, see +[Report a Security Issue](https://security.metacpan.org/docs/report.html) +on the CPANSec website. + +## Response to Reports + +The maintainer(s) aim to acknowledge your security report as soon as +possible. However, this project is maintained by a single person in +their spare time, and they cannot guarantee a rapid response. If you +have not received a response from them within 2 weeks, then +please send a reminder to them and copy the report to CPANSec at +<[email protected]>. + +Please note that the initial response to your report will be an +acknowledgement, with a possible query for more information. It +will not necessarily include any fixes for the issue. + +The project maintainer(s) may forward this issue to the security +contacts for other projects where we believe it is relevant. This +may include embedded libraries, system libraries, prerequisite +modules or downstream software that uses this software. + +They may also forward this issue to CPANSec. + +# Which Software This Policy Applies To + +Any security vulnerabilities in Crypt-DES are covered by this policy. + +Security vulnerabilities in versions of any libraries that are +included in Crypt-DES are also covered by this policy. + +Security vulnerabilities are considered anything that allows users +to execute unauthorised code, access unauthorised resources, or to +have an adverse impact on accessibility or performance of a system. + +Security vulnerabilities in upstream software (prerequisite modules +or system libraries, or in Perl), are not covered by this policy +unless they affect Crypt-DES, or Crypt-DES can +be used to exploit vulnerabilities in them. + +Security vulnerabilities in downstream software (any software that +uses Crypt-DES, or plugins to it that are not included with the +Crypt-DES distribution) are not covered by this policy. + +## Supported Versions of Crypt-DES + +The maintainer(s) will only commit to releasing security fixes for +the latest version of Crypt-DES. + +# Installation and Usage Issues + +The distribution metadata specifies minimum versions of +prerequisites that are required for Crypt-DES to work. However, some +of these prerequisites may have security vulnerabilities, and you +should ensure that you are using up-to-date versions of these +prerequisites. + +Where security vulnerabilities are known, the metadata may indicate +newer versions as recommended. + +## Usage + +Please see the software documentation for further information. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Crypt-DES-2.07/_des.h new/Crypt-DES-2.09/_des.h --- old/Crypt-DES-2.07/_des.h 2005-12-08 16:53:47.000000000 +0100 +++ new/Crypt-DES-2.09/_des.h 2026-08-08 21:43:21.000000000 +0200 @@ -2,6 +2,6 @@ typedef unsigned char des_cblock[8]; typedef unsigned long des_ks[32]; -void _des_crypt( des_cblock in, des_cblock out, des_ks key, int encrypt ); -void _des_expand_key( des_user_key userKey, des_ks key ); +void perl_des_crypt( des_cblock in, des_cblock out, des_ks key, int encrypt ); +void perl_des_expand_key( des_user_key userKey, des_ks key ); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Crypt-DES-2.07/test.pl new/Crypt-DES-2.09/test.pl --- old/Crypt-DES-2.07/test.pl 2013-07-23 22:41:55.000000000 +0200 +++ new/Crypt-DES-2.09/test.pl 2026-08-11 00:22:47.000000000 +0200 @@ -23,7 +23,7 @@ # Other items we are prepared to export if requested @EXPORT_OK = qw(); -$VERSION = '2.07'; +$VERSION = '2.09'; bootstrap Crypt::DES; use strict; @@ -263,12 +263,12 @@ my $fail = 0; my $tt = (scalar(@{$testval}) *2); print "1..$tt\n"; -my $t0 = new Benchmark; +my $t0 = Benchmark->new(); foreach my $tst (@{$testval}) { my ($anot,$bnot) = (0,0); foreach(@{$tst}) { $_ = pack("H*",$_) } - my $cipher = new Crypt::DES($tst->[0]); + my $cipher = Crypt::DES->new($tst->[0]); $anot = 1 unless ($cipher->encrypt($tst->[1]) eq $tst->[2]); if($anot) { #print "not "; @@ -284,7 +284,7 @@ ; $i++; } -my $t1 = new Benchmark; +my $t1 = Benchmark->new(); my $suc = $tt - $fail; my $fp = sprintf("%0.2f",(($tt / $suc) * 100)) unless $suc == 0; @@ -298,35 +298,35 @@ } else { print "\nRunning speed tests...\n"; print "\nnon-cached cipher speed test. 5000 encrypt iterations\n"; - my $t2 = new Benchmark; + my $t2 = Benchmark->new(); for(1..5000) { - my $cipher = new Crypt::DES(pack("H*",'1c587f1c13924fef')); + my $cipher = Crypt::DES->new(pack("H*",'1c587f1c13924fef')); $cipher->encrypt(pack("H*",'305532286d6f295a')); } - my $t3 = new Benchmark; + my $t3 = Benchmark->new(); my $td1 = timediff($t3,$t2); my $ts1 = timestr($td1); print "$ts1\nok 343\n"; print "\nnon-cached cipher speed test. 5000 decrypt iterations\n"; - my $t4 = new Benchmark; + my $t4 = Benchmark->new(); for(1..5000) { - my $cipher = new Crypt::DES(pack("H*",'1c587f1c13924fef')); + my $cipher = Crypt::DES->new(pack("H*",'1c587f1c13924fef')); $cipher->decrypt(pack("H*",'63fac0d034d9f793')); } - my $t5 = new Benchmark; + my $t5 = Benchmark->new(); my $td2 = timediff($t5,$t4); my $ts2 = timestr($td2); print "$ts2\nok 344\n"; print "\ncached cipher speed test. 10000 encrypt iterations\n"; { - my $t6 = new Benchmark; - my $cipher = new Crypt::DES(pack("H*",'1c587f1c13924fef')); + my $t6 = Benchmark->new(); + my $cipher = Crypt::DES->new(pack("H*",'1c587f1c13924fef')); for(1..10000) { $cipher->encrypt(pack("H*",'305532286d6f295a')); } - my $t7 = new Benchmark; + my $t7 = Benchmark->new(); my $td3 = timediff($t7,$t6); my $ts3 = timestr($td3); print "$ts3\nok 345\n"; @@ -334,12 +334,12 @@ print "\ncached cipher speed test. 10000 decrypt iterations\n"; { - my $t8 = new Benchmark; - my $cipher = new Crypt::DES(pack("H*",'1c587f1c13924fef')); + my $t8 = Benchmark->new(); + my $cipher = Crypt::DES->new(pack("H*",'1c587f1c13924fef')); for(1..10000) { $cipher->decrypt(pack("H*",'63fac0d034d9f793')); } - my $t9 = new Benchmark; + my $t9 = Benchmark->new(); my $td4 = timediff($t9,$t8); my $ts4 = timestr($td4); print "$ts4\nok 346\n"; @@ -354,7 +354,7 @@ $@ = "CBC mode requires Crypt::CBC version 1.22 or higher."; } else { - my $cipher = new Crypt::CBC(pack("H*","0123456789ABCDEF"),"DES"); + my $cipher = Crypt::CBC->new(pack("H*","0123456789ABCDEF"),"DES"); my $ciphertext = $cipher->encrypt(pack("H*","37363534333231204E6F77206973207468652074696D6520666F722000")); my $plaintext = $cipher->decrypt($ciphertext); ++++++ README.md ++++++ ## Build Results Current state of perl in openSUSE:Factory is  The current state of perl in the devel project build (devel:languages:perl)  ++++++ _scmsync.obsinfo ++++++ mtime: 1787315397 commit: 37ed774a2ea51c1a648e4e9b4907e8913cf01cb6fd1a8e80f9aaaef1025298d7 url: https://src.opensuse.org/perl/perl-Crypt-DES revision: 37ed774a2ea51c1a648e4e9b4907e8913cf01cb6fd1a8e80f9aaaef1025298d7 projectscmsync: https://src.opensuse.org/perl/_ObsPrj ++++++ build.specials.obscpio ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/.gitignore new/.gitignore --- old/.gitignore 1970-01-01 01:00:00.000000000 +0100 +++ new/.gitignore 2026-08-21 14:29:57.000000000 +0200 @@ -0,0 +1 @@ +.osc ++++++ cpanspec.yml ++++++ --- #description_paragraphs: 3 #description: |- # override description from CPAN #summary: override summary from CPAN #no_testing: broken upstream #sources: # - source1 # - source2 #patches: # foo.patch: -p1 # bar.patch: # baz.patch: PATCH-FIX-OPENSUSE #preamble: |- # BuildRequires: gcc-c++ #post_prep: |- # hunspell=`pkg-config --libs hunspell | sed -e 's,-l,,; s, *,,g'` # sed -i -e "s,hunspell-X,$hunspell," t/00-prereq.t Makefile.PL #post_build: |- # rm unused.files #post_install: |- # sed on %{name}.files license: BSD-3-Clause #skip_noarch: 1 #custom_build: |- #./Build build flags=%{?_smp_mflags} --myflag #custom_test: |- #startserver && make test #ignore_requires: Bizarre::Module #ignore_provides: Module::To::Ignore #skip_doc: regexp_to_skip_for_doc.* #add_doc: files to add to docs #misc: |- #anything else to be added to spec file #follows directly after %files section, so it can contain new blocks or also #changes to %files section #epoch: number # Where module files should be searched for. Default: lib/ #index_dir:
