Since (at least) perl 5.10.0, this situation is now caught and handled
slightly better than segfaulting:
chr...@crispylappy:~$ perl /home/chrisb/390442.pl
panic: attempt to copy value meh to a freed scalar 19b0d48 at
/home/chrisb/390442.pl line 9.
I suspect we can consider this bug fixed in
forwarded 390442 perl5-porters@perl.org
thanks
On Wed, Oct 18, 2006 at 03:06:01PM +0100, Nicholas Clark wrote:
The test case can be reduced somewhat:
#!/usr/bin/perl
use strict;
use warnings;
my %H;
my $v = meh;
$H{A} ||= do {
foreach my $k (keys %H) {
delete $H{$k};
}
$v;
Package: perl
Version: 5.8.8-6.1
Severity: normal
Script attached will provoke a segfault or free()-related abort on
every Perl I've tried from 5.004 to 5.8.8. Google shows nothing
relevant-looking for segfault Perl_newSVpvn_share so I believe it's
a new bug. The code is of the form
3 matches
Mail list logo
