From @andk

bisect

commit 4df352a
Author​: David Mitchell <davem@​iabyn.com>
Date​: Mon Oct 12 14​:56​:35 2015 +0100

  reverse the order of POPBLOCK; POPFOO

diagnostics

matrix​: http​://matrix.cpantesters.org/?dist=Sig-PackageScoped%200.04
sample fail report​: http​://www.cpantesters.org/cpan/report/036fa002-de61-11e5-9e16-2e8cfcd2507e

perl -V

Summary of my perl5 (revision 5 version 23 subversion 8) configuration​:
 
  Platform​:
  osname=linux, osvers=3.2.0-4-amd64, archname=x86_64-linux
  uname='linux eserte 3.2.0-4-amd64 #1 smp debian 3.2.73-2+deb7u2 x86_64 gnulinux '
  config_args='-ds -e -Dprefix=/opt/perl-5.23.8 -Dusedevel -Dusemallocwrap=no -Dcf_email=srezic@​cpan.org'
  hint=recommended, useposix=true, d_sigaction=define
  useithreads=undef, usemultiplicity=undef
  use64bitint=define, use64bitall=define, uselongdouble=undef
  usemymalloc=n, bincompat5005=undef
  Compiler​:
  cc='cc', ccflags ='-fwrapv -fno-strict-aliasing -pipe -fstack-protector -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -D_FORTIFY_SOURCE=2',
  optimize='-O2',
  cppflags='-fwrapv -fno-strict-aliasing -pipe -fstack-protector -I/usr/local/include'
  ccversion='', gccversion='4.7.2', gccosandvers=''
  intsize=4, longsize=8, ptrsize=8, doublesize=8, byteorder=12345678, doublekind=3
  d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16, longdblkind=3
  ivtype='long', ivsize=8, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8
  alignbytes=8, prototype=define
  Linker and Libraries​:
  ld='cc', ldflags =' -fstack-protector -L/usr/local/lib'
  libpth=/usr/local/lib /usr/lib/gcc/x86_64-linux-gnu/4.7/include-fixed /usr/include/x86_64-linux-gnu /usr/lib /lib/x86_64-linux-gnu /lib/../lib /usr/lib/x86_64-linux-gnu /usr/lib/../lib /lib
  libs=-lpthread -lnsl -ldb -ldl -lm -lcrypt -lutil -lc
  perllibs=-lpthread -lnsl -ldl -lm -lcrypt -lutil -lc
  libc=libc-2.13.so, so=so, useshrplib=false, libperl=libperl.a
  gnulibc_version='2.13'
  Dynamic Linking​:
  dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E'
  cccdlflags='-fPIC', lddlflags='-shared -O2 -L/usr/local/lib -fstack-protector'

Characteristics of this binary (from libperl)​:
  Compile-time options​: HAS_TIMES PERLIO_LAYERS PERL_COPY_ON_WRITE
  PERL_DONT_CREATE_GVSV
  PERL_HASH_FUNC_ONE_AT_A_TIME_HARD PERL_PRESERVE_IVUV
  PERL_USE_DEVEL USE_64_BIT_ALL USE_64_BIT_INT
  USE_LARGE_FILES USE_LOCALE USE_LOCALE_COLLATE
  USE_LOCALE_CTYPE USE_LOCALE_NUMERIC USE_LOCALE_TIME
  USE_PERLIO USE_PERL_ATOF
  Built under linux
  Compiled at Feb 21 2016 07​:00​:19
  %ENV​:
  PERL5LIB=""
  PERL5OPT=""
  PERL5_CPANPLUS_IS_RUNNING="13023"
  PERL5_CPAN_IS_RUNNING="13023"
  PERL5_CPAN_IS_RUNNING_IN_RECURSION="14270,13023"
  PERLDOC="-MPod​::Perldoc​::ToTextOverstrike"
  PERL_BATCH="yes"
  PERL_CANARY_STABILITY_NOPROMPT="1"
  PERL_CPAN_REPORTER_CONFIG="/var/tmp/cpansmoker-1023/2016022818/cpanreporter_002_config.ini"
  PERL_EXTUTILS_AUTOINSTALL="--defaultdeps"
  PERL_PARALLEL_SMOKER="yes"
  @​INC​:
  /opt/perl-5.23.8/lib/site_perl/5.23.8/x86_64-linux
  /opt/perl-5.23.8/lib/site_perl/5.23.8
  /opt/perl-5.23.8/lib/5.23.8/x86_64-linux
  /opt/perl-5.23.8/lib/5.23.8
  .
 
--
andreas

From @iabyn

On Wed, Mar 02, 2016 at 10​:57​:39AM -0800, Andreas J. Koenig via RT wrote​:

# New Ticket Created by (Andreas J. Koenig)
# Please include the string​: [perl #127644]
# in the subject line of all future correspondence about this issue.
# <URL​: https://rt-archive.perl.org/perl5/Ticket/Display.html?id=127644 >

bisect
------
commit 4df352a
Author​: David Mitchell <davem@​iabyn.com>
Date​: Mon Oct 12 14​:56​:35 2015 +0100

reverse the order of POPBLOCK; POPFOO

diagnostics
-----------
matrix​: http​://matrix.cpantesters.org/?dist=Sig-PackageScoped%200.04
sample fail report​: http​://www.cpantesters.org/cpan/report/036fa002-de61-11e5-9e16-2e8cfcd2507e

This is due to the caller() used by a destructor etc called during a scope
exit now sees the last statement of the block being exited, rather than
seeing the first statement in the block as previously.

Since this is a package at version 0.04, with no new release for 8 years,
and which in its main docs says​:

  But really, this is more of a demonstration of weird things you can do
  with Perl than a good thing to use in production. You have been
  warned.

and for the specific module that fails its tests​:

  The fact that this works scares me deeply. It is not recommended that
  you use this code in any sort of production environment.

I'm not going to worry about it very much, other than updating the rt.cpan
ticket https://rt.cpan.org/Public/Bug/Display.html?id=112547
with new info.

--
This email is confidential, and now that you have read it you are legally
obliged to shoot yourself. Or shoot a lawyer, if you prefer. If you have
received this email in error, place it in its original wrapping and return
for a full refund. By opening this email, you accept that Elvis lives.

The RT System itself - Status changed from 'new' to 'open'

@iabyn - Status changed from 'open' to 'rejected'