[ID 20000314.001] SEGV with eval "use ..." and method call

Sorry if this is a duplicate, I sent a similar report with perlbug
yesterday but didn't receive it back nor can I find it in the archive.
Maybe mail on that machine was misconfigured.

It's a long standing bug, the following code core dumps with
yesterday's repository perl.

perl -le '       
require "MD5.pm";
sub new { bless {}, shift;}   # OK if commented
open FH, "/etc/hosts" or die;
my $md5 = new MD5;            # OK if MD5->new
print "md5[$md5]\n";          # prints e.g. md5[MD5=HASH(0x80ee280)]
$md5->addfile(*FH);           # SEGV
'
md5[MD5=HASH(0x80ed200)]

zsh: segmentation fault (core dumped)


I have reported this long time ago (no bug ID), you can find the old
postings with this query:

    http://www.xray.mpe.mpg.de/cgi-bin/w3glimpse/perl5-porters?query=md5+addfile+hash&errors=0&case=on&maxfiles=100&maxlines=30



-- 
andreas

• [ID 20000314.001] SEGV with eval "use ..." and method call by andreas.koenig
• Re: [ID 20000314.001] SEGV with eval "use ..." and method call by Gurusamy Sarathy
• Re: [ID 20000314.001] SEGV with eval "use ..." and method call by Gisle Aas
• Re: [ID 20000314.001] SEGV with eval "use ..." and method call by Stephen Zander