|Subject:||Filter::exec segv on __DATA__|
|Date:||Sat, 24 Apr 2010 11:16:59 +1000|
|To:||bug-Filter [...] rt.cpan.org|
|From:||Kevin Ryde <user42 [...] zip.com.au>|
With recent debian i386 packaged perl 5.10.1 the program foo.pl below gets a segv. gdb and libc claim it's a bad pointer to a free() in an sv_clear() somewhere under Perl_parser_free(). I'm not sure the __DATA__ token quite works with the way Filter::exec connects the input up to the subprocess, but I hoped it wouldn't segfault, especially when the DATA file handle as such is not used.
use Filter::exec 'cat'; __DATA__