Skip Menu |

This queue is for tickets about the IO-Compress-Base CPAN distribution.

Report information
The Basics
Id: 34747
Status: resolved
Priority: 0/
Queue: IO-Compress-Base

People
Owner: Nobody in particular
Requestors: dmuey [...] cpan.org
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)



Subject: small File::GlobMapper mis-logic
Hello, This module appears to be under IO-Compress-Base so here she is (IE no http://rt.cpan.org/Public/Bug/Report.html?Queue=File-GlobMapper ) GlobMapper.pm: use warnings; use Carp; our ($CSH_GLOB); BEGIN { if ($] < 5.006) { That if block will never ever be gotten into because it'd have already died in < 5.6 w/ 'use warnings' and our()...
From: pmqs [...] cpan.org
On Mon Apr 07 17:56:18 2008, DMUEY wrote: Show quoted text
> Hello, > > This module appears to be under IO-Compress-Base so here she is (IE no > http://rt.cpan.org/Public/Bug/Report.html?Queue=File-GlobMapper ) > > GlobMapper.pm: > > use warnings; > use Carp; > > our ($CSH_GLOB); > > BEGIN > { > if ($] < 5.006) > { > > That if block will never ever be gotten into because it'd have already > died in < 5.6 w/ 'use > warnings' and our()...
Hi Daniel, thanks for the feedback. You are correct, the "if" will not get run when the "use warnings" is present. The bit you may not be aware of is the optional pre-processing step that is done on the code when it is being built. If you build this module on a version of perl that doesn't support "use warnings" it modifies the code to replace all "use warnings" with "local ($^W) = 1" before it is installed. cheers Paul