Subject: | Segfault if mesh passed bad arrayref |
Date: | Mon, 20 Jul 2009 00:54:49 +0200 |
To: | bug-List-MoreUtils [...] rt.cpan.org |
From: | Ansgar Burchardt <ansgar [...] 2008.43-1.org> |
Hi,
another bug forwarded from Debian (http://bugs.debian.org/521471).
I can reproduce the problem with List-MoreUtils 0.22.
Regards,
Ansgar
Subject: | Segfault if mesh passed bad arrayref |
Date: | Fri, 27 Mar 2009 16:10:31 -0400 |
To: | Debian Bug Tracking System <submit [...] bugs.debian.org> |
From: | Anthony DeRobertis <anthony [...] derobert.net> |
Package: liblist-moreutils-perl
Version: 0.22-1+b1
Severity: normal
File: /usr/lib/perl5/List/MoreUtils.pm
$ cat t.pl
use List::MoreUtils qw(mesh);
&mesh($foo, $bar);
$ perl t.pl
Segmentation fault
An error message would be much better. The pure pure implementation does
not seem to suffer from this problem; only the XS version.
Here is a backtrace using perl-debug:
(gdb) bt
#0 Perl_av_len (my_perl=0x9d02008, av=0x0) at av.c:749
#1 0xb7f06fa9 in XS_List__MoreUtils_mesh ()
from /usr/lib/perl5/auto/List/MoreUtils/MoreUtils.so
#2 0x080e0bf1 in Perl_pp_entersub (my_perl=0x9d02008) at pp_hot.c:2850
#3 0x080a58df in Perl_runops_debug (my_perl=0x9d02008) at dump.c:1931
#4 0x080d6d61 in perl_run (my_perl=0x9d02008) at perl.c:2391
#5 0x08063f45 in main (argc=2, argv=0xbff37464, env=0xbff37470)
at perlmain.c:113
-- System Information:
Debian Release: squeeze/sid
APT prefers testing
APT policy: (500, 'testing'), (500, 'stable'), (100, 'unstable')
Architecture: i386 (i686)
Kernel: Linux 2.6.28-1-686 (SMP w/2 CPU cores)
Locale: LANG=en_US.UTF-8, LC_CTYPE=en_US.UTF-8 (charmap=UTF-8)
Shell: /bin/sh linked to /bin/bash
Versions of packages liblist-moreutils-perl depends on:
ii libc6 2.9-4 GNU C Library: Shared libraries
ii perl 5.10.0-19 Larry Wall's Practical Extraction
ii perl-base [perlapi-5.10.0] 5.10.0-19 minimal Perl system
liblist-moreutils-perl recommends no packages.
liblist-moreutils-perl suggests no packages.
-- no debconf information