Package: perl
Version: 5.8.8-11.1
Severity: normal
The file foo.pl below run with "perl foo.pl" produces
Segmentation fault
It's got a syntax error (no expression before the "or") and I hoped that
would be reported instead of a segv.
Running debugperl under gdb gives
#0 0x080b8624 in Perl_pad_free (my_perl=0x81bc008, po=4) at pad.c:1180
#1 0x080a1494 in Perl_op_clear (my_perl=0x81bc008, o=0x81c5118) at op.c:515
#2 0x080a1028 in Perl_op_free (my_perl=0x81bc008, o=0x81c5118) at op.c:379
#3 0x080a0fc4 in Perl_op_free (my_perl=0x81bc008, o=0x81da0b0) at op.c:367
#4 0x080ad181 in Perl_newATTRSUB (my_perl=0x81bc008, floor=103, o=0x81d9d48,
proto=0x0, attrs=0x0, block=0x81da0b0) at op.c:4424
#5 0x0809e177 in Perl_yyparse (my_perl=0x81bc008) at perly.y:364
#6 0x08068958 in S_parse_body (my_perl=0x81bc008, env=0x0,
xsinit=0x806392f <xs_init>) at perl.c:2206
#7 0x0806766a in perl_parse (my_perl=0x81bc008, xsinit=0x806392f <xs_init>,
argc=2, argv=0xbf89e504, env=0x0) at perl.c:1598
#8 0x080638b9 in main (argc=2, argv=0xbf89e504, env=0xbf89e510)
at perlmain.c:97
-- System Information:
Debian Release: lenny/sid
APT prefers unstable
APT policy: (500, 'unstable')
Architecture: i386 (i586)
Kernel: Linux 2.6.22-2-486
Locale: LANG=en_AU, LC_CTYPE=en_AU (charmap=ISO-8859-1)
Shell: /bin/sh linked to /bin/dash
Versions of packages perl depends on:
ii libc6 2.6.1-2 GNU C Library: Shared libraries
ii libdb4.6 4.6.21-4 Berkeley v4.6 Database Libraries [
ii libgdbm3 1.8.3-3 GNU dbm database routines (runtime
ii perl-base 5.8.8-11.1 The Pathologically Eclectic Rubbis
ii perl-modules 5.8.8-11.1 Core Perl modules
Versions of packages perl recommends:
ii perl-doc 5.8.8-7 Perl documentation
-- no debconf information
sub foo {
my ($x) = @_;
sub {
or 'y';
};
}
