I wrote: > { package o; use overload bool => sub { die unless $::ok++; return 1 } } > use constant OK => bless [], o::; > do{print("foobar");}until OK; > __END__ > Bus error: 10 > > So, yes, we definitely still have a bug here. :-) > > And I suspect it is a regression, too. Bisecting seems impossible, as the crash is intermittent. My read- ing of the source code suggests this has been present in some form or another since perl 5.000.Thread Previous | Thread Next