Skip Menu |

This queue is for tickets about the Archive-Extract CPAN distribution.

Report information
The Basics
Id: 105425
Status: resolved
Priority: 0/
Queue: Archive-Extract
People
Owner: Nobody in particular
Requestors: gary.bell [...] aero.bombardier.com
Cc:
AdminCc:
Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: 0.76

History Show all quoted text
  Tue Jun 23 10:20:44 2015 gary.bell [...] aero.bombardier.com - Ticket created
Subject: BUG: extract method fails under perl v5.20.1
Date: Tue, 23 Jun 2015 14:20:02 +0000
To: "bug-Archive-Extract [...] rt.cpan.org" <bug-Archive-Extract [...] rt.cpan.org>
From: Gary Bell <gary.bell [...] aero.bombardier.com>
Hi, I am using the Archive::Extract::extract() method to unzip a number of deflated zip files on Windows 7 64-bit machine. This code has worked for years under perl 5.16.3 and perl 5.18.4; but it now fails in perl version 5.20.1 with the following error message: Setting $/ to a REGEXP reference is forbidden at C:/Strawberry/perl/vendor/lib/Archive/Extract.pm line 1114. The problem is caused by the following line in Extract.pm: local $/ = ON_WIN32 ? qr/\r?\n/ : "\n"; I am using the following strawberry perl versions: This is perl 5, version 16, subversion 3 (v5.16.3) built for MSWin32-x64-multi-thread (** Works **) This is perl 5, version 18, subversion 4 (v5.18.4) built for MSWin32-x64-multi-thread (** Works **) This is perl 5, version 20, subversion 1 (v5.20.1) built for MSWin32-x64-multi-thread (** FAILS **) The only global variables set before the call are: $Archive::Extract::DEBUG = 0; $Archive::Extract::PREFER_BIN = 1; Unzip.exe binary is installed and working in d:\jenkins\utils\unzip.exe , module finds it OK according to $zipObject->bin_unzip Thanks! Best Regards, Gary.
  Tue Jun 23 10:32:57 2015 gary.bell [...] aero.bombardier.com - Correspondence added
Subject: RE: [rt.cpan.org #105425] AutoReply: BUG: extract method fails under perl v5.20.1
Date: Tue, 23 Jun 2015 14:32:45 +0000
To: "bug-Archive-Extract [...] rt.cpan.org" <bug-Archive-Extract [...] rt.cpan.org>
From: Gary Bell <gary.bell [...] aero.bombardier.com>
The change in the core perl language can be seen here: https://metacpan.org/pod/perl5200delta Show quoted text
------------------------- Quote ----------------------------- References to non-integers and non-positive integers in $/ ============================================= Setting $/ to a reference to zero or a reference to a negative integer is now deprecated, and will behave exactly as though it was set to undef. If you want slurp behavior set $/ to undef explicitly. Setting $/ to a reference to a non integer is now forbidden and will throw an error. Perl has never documented what would happen in this context and while it used to behave the same as setting $/ to the address of the references in future it may behave differently, so we have forbidden this usage.
----------------------- Quote -----------------------------
  Thu Dec 05 16:20:50 2019 BINGOS [...] cpan.org - Correspondence added
Accords to my records this was resolved with release 0.76 Many thanks.
  Thu Dec 05 16:20:51 2019 The RT System itself - Status changed from 'new' to 'open'
  Thu Dec 05 16:20:51 2019 BINGOS [...] cpan.org - Status changed from 'open' to 'resolved'
  Thu Dec 05 16:20:51 2019 BINGOS [...] cpan.org - Fixed in 0.76 added