Path: utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!wuarchive!cs.utexas.edu!sun-barr!newstop!texsun!convex!convex.com!tchrist
From: tchrist@convex.com (Tom Christiansen)
Newsgroups: comp.lang.perl
Subject: package bug
Message-ID: <5317@convex.convex.com>
Date: 10 Feb 90 01:49:12 GMT
Sender: news@convex.com
Organization: Convex Computer Corporation; Richardson, TX
Lines: 23

The following sub-program causes perl (v3.0pl8) to dump core.  The problem
seems to be using a variable in a package before it's assigned to.
I get a "Long jump botched -- Illegal instruction (core dumped)"
Commenting out the "die" line makes it better.  

    do 'blowup.pl';

will trigger the problem, where 'blowup.pl' is

    package foo;
    die "can't find $fooblatz" unless $fooblatz;
    sub main'foo {
	$callme++;
	print "i am foo main, called $callme times\n";
    }
    1;

--tom
--

    Tom Christiansen                       {uunet,uiucdcs,sun}!convex!tchrist 
    Convex Computer Corporation                            tchrist@convex.COM
		 "EMACS belongs in <sys/errno.h>: Editor too big!"