> > unfortunately, I'm not sure if there's a workable workaround for that. > > if you can come up with a pure-perl, non-spamassassin-based > test case, it might be worth reporting it to the perl > maintainers via "perlbug"... > sounds like they've made some stack-size assumptions that are > not valid on FreeBSD by default. > > - --j.
Actually I do have some test-cases. http://noaa.cdsinet.net/~zeek/test-good.txt.gz http://noaa.cdsinet.net/~zeek/test-bad.txt.gz These are the results from the 'x $evalstr'. The test-bad is the full $evalstr that causes the bus errors, and test-good is one that doesn't. Add just one if() block to test-good and it fails. Also: perl -e 'my $x = q[if ($h->{ALPHA}->{BETA}->{q{stuff}}) {] . "\n" . q[ stuff($h, @_);] . "\n}\n\n"; $x x= 7238; $x =~ s/stuff/"stuff" . ++$count/eg; eval $x' (that should be all on one line). Adjust the number after x= until it errors out. 7239 crashes for me, 7238 doesn't. John Narron | "Sacrifice, they always say Network Administration | Is a sign of nobility CDS/CDSinet, LLC | But where does one draw the line http://www.cdsinet.net | In the face of injury?" (660) 886 4045 | - Queensryche
