[comp.lang.perl] Segmentation fault"

mayer@sono.uucp (Ronald &) (06/29/91)

I get a segmentation fault when I try:

    #!/usr/local/bin/perl
    sub sub1 {
        eval("sub sub2 {/1/;&sub1;/1/;}");
    }
    &sub1;
    &sub2;

Interestingly, it doesn't happen when I take out the '/1/' statements.

    Perl 4.0 Patch level: 3
    SunOS 4.1 1
    sparc

[Does this happen in Patch level: 10?  We haven't upgraded yet.]

    Ron Mayer
    mayer@sono.uucp