Bug #90227 for Scalar-List-Utils: weaken CODEREF

Sun Nov 10 23:33:49 2013 POWERMAN [...] cpan.org - Ticket created

Subject:

weaken CODEREF

Looks like weaken doesn't support CODE: $ perl -MScalar::Util=weaken -E '$a={}; weaken($b=$a);$a=0;say $b' $ perl -MScalar::Util=weaken -E '$a=sub{};weaken($b=$a);$a=0;say $b' CODE(0x5964f33f920) Tested on perl-5.12.4, Scalar::Util-1.35. On perlmonks this issue was confirmed on 5.18.0: http://perlmonks.org/?node_id=1061941

Mon Nov 11 00:30:56 2013 $_ = 'spro^^*%*^6ut# [...] &$%*c>#!^!#&!pan.org'; y/a-z.@//cd; print - Correspondence added

On Sun Nov 10 23:33:49 2013, POWERMAN wrote: Show quoted text

> Looks like weaken doesn't support CODE: > > $ perl -MScalar::Util=weaken -E '$a={}; weaken($b=$a);$a=0;say $b' > > $ perl -MScalar::Util=weaken -E '$a=sub{};weaken($b=$a);$a=0;say $b' > CODE(0x5964f33f920) > > Tested on perl-5.12.4, Scalar::Util-1.35. > On perlmonks this issue was confirmed on 5.18.0: > http://perlmonks.org/?node_id=1061941

The reference is weakened in this case, but the subroutine has a reference elsewhere, namely, in the op tree. Try this: $ perl -MScalar::Util=weaken -E '$a=eval"sub{}";weaken($b=$a);$a=0;say $b' This is related to perl bugs #3305 and #3306. In short, there is no bug in Scalar::Util here.

Mon Nov 11 00:30:56 2013 The RT System itself - Status changed from 'new' to 'open'

Mon Nov 11 02:12:48 2013 POWERMAN [...] cpan.org - Correspondence added

Thanks for explanation.

Mon Nov 11 02:12:49 2013 POWERMAN [...] cpan.org - Status changed from 'open' to 'rejected'