develooper Front page | perl.perl5.porters | Postings from September 2013

[perl #119993] segmentation fault/memory corruption in pure perl

Thread Previous
From:
l . mai @ web . de
Date:
September 24, 2013 21:39
Subject:
[perl #119993] segmentation fault/memory corruption in pure perl
Message ID:
rt-3.6.HEAD-1873-1380058738-696.119993-75-0@perl.org
# New Ticket Created by  l.mai@web.de 
# Please include the string:  [perl #119993]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org:443/rt3/Ticket/Display.html?id=119993 >



This is a bug report for perl from l.mai@web.de,
generated with the help of perlbug 1.39 running under perl 5.18.1.


-----------------------------------------------------------------
[Please describe your issue here]

I have a pure Perl program (code below) that gives this kind of output:

% perl wtf.pl
panic: bad gimme: 12
zsh: segmentation fault  perl wtf.pl
% perl wtf.pl
panic: bad gimme: 44
zsh: segmentation fault  perl wtf.pl
% perl wtf.pl
panic: bad gimme: 204
zsh: segmentation fault  perl wtf.pl

% valgrind perl wtf.pl
==13124== Memcheck, a memory error detector
==13124== Copyright (C) 2002-2012, and GNU GPL'd, by Julian Seward et al.
==13124== Using Valgrind-3.8.1 and LibVEX; rerun with -h for copyright info
==13124== Command: perl wtf.pl
==13124== 
==13124== Invalid write of size 4
==13124==    at 0x80AC578: Perl_pp_rv2gv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e1f0 is 480 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid write of size 4
==13124==    at 0x812D171: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e1f4 is 484 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid read of size 4
==13124==    at 0x80DADA9: Perl_pp_gelem (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e1f4 is 484 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid read of size 4
==13124==    at 0x80DADDB: Perl_pp_gelem (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e1f0 is 480 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid write of size 4
==13124==    at 0x80DAE23: Perl_pp_gelem (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e1f0 is 480 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid read of size 4
==13124==    at 0x8140EF3: Perl_pp_or (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e1f0 is 480 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid write of size 4
==13124==    at 0x812D1C1: Perl_pp_gv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e1f8 is 488 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid read of size 4
==13124==    at 0x80B4DB5: Perl_pp_entersub (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e1f8 is 488 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid read of size 4
==13124==    at 0x400B938: memcpy (mc_replace_strmem.c:878)
==13124==    by 0x80B50C2: Perl_pp_entersub (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e1f4 is 484 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid read of size 4
==13124==    at 0x80B50D8: Perl_pp_entersub (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e1f4 is 484 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid write of size 4
==13124==    at 0x400B835: memcpy (mc_replace_strmem.c:878)
==13124==    by 0x812CF26: S_pushav.20927 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D0DC: Perl_pp_padrange (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e1f4 is 484 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid write of size 4
==13124==    at 0x812D00B: Perl_pp_padrange (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e1f8 is 488 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid read of size 4
==13124==    at 0x80D6A45: Perl_pp_aassign (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e1f8 is 488 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid read of size 4
==13124==    at 0x80D6E6E: Perl_pp_aassign (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e1f4 is 484 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid write of size 4
==13124==    at 0x80D6E7E: Perl_pp_aassign (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e1f4 is 484 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid write of size 4
==13124==    at 0x811135A: Perl_pp_padsv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e1fc is 492 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid read of size 4
==13124==    at 0x81564E3: Perl_pp_concat (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e1f8 is 488 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid read of size 4
==13124==    at 0x81564EB: Perl_pp_concat (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e1fc is 492 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid write of size 4
==13124==    at 0x8156634: Perl_pp_concat (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e1f8 is 488 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid read of size 4
==13124==    at 0x80AC535: Perl_pp_rv2gv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e1f8 is 488 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid read of size 4
==13124==    at 0x812D57D: Perl_pp_leavesub (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e1f4 is 484 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid write of size 4
==13124==    at 0x812D568: Perl_pp_leavesub (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e1f4 is 484 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid read of size 4
==13124==    at 0x815642C: Perl_pp_concat (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e200 is 496 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid read of size 4
==13124==    at 0x815642F: Perl_pp_concat (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e204 is 500 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid read of size 4
==13124==    at 0x808F36A: Perl_pp_entereval (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e200 is 496 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid write of size 4
==13124==    at 0x80C1305: Perl_pp_anoncode (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e200 is 496 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid read of size 4
==13124==    at 0x80ACA60: Perl_pp_refgen (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e200 is 496 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid write of size 4
==13124==    at 0x80ACA62: Perl_pp_refgen (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e200 is 496 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid write of size 4
==13124==    at 0x80AC9FA: Perl_pp_refgen (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e200 is 496 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid read of size 4
==13124==    at 0x80D9B15: S_adjust_stack_on_leave.26535 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x80D9F4D: Perl_pp_leaveeval (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e200 is 496 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid write of size 4
==13124==    at 0x80D9B46: S_adjust_stack_on_leave.26535 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x80D9F4D: Perl_pp_leaveeval (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e200 is 496 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid read of size 4
==13124==    at 0x80ACAE6: Perl_pp_sassign (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e204 is 500 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid read of size 4
==13124==    at 0x80ACAE8: Perl_pp_sassign (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e200 is 496 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid write of size 4
==13124==    at 0x80ACB45: Perl_pp_sassign (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e200 is 496 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid write of size 4
==13124==    at 0x812F6A1: Perl_pp_gvsv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e200 is 496 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid read of size 4
==13124==    at 0x8140CA6: Perl_pp_and (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e200 is 496 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid read of size 4
==13124==    at 0x80ACA38: Perl_pp_refgen (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e208 is 504 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid write of size 4
==13124==    at 0x80ACA42: Perl_pp_refgen (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0x405e208 is 504 bytes inside a block of size 512 free'd
==13124==    at 0x4009DE2: realloc (vg_replace_malloc.c:662)
==13124==    by 0x8141A87: Perl_safesysrealloc (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x814401C: Perl_av_extend_guts (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811813F: Perl_av_extend (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812CE31: Perl_stack_grow (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x812D191: Perl_pp_const (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x811FC97: Perl_call_sv (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8132D45: Perl_call_list (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x813311F: S_process_special_blocks.3362 (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8100FED: Perl_newATTRSUB_flags (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x8102ED9: Perl_utilize (in /home/mauke/usr/local/bin/perl)
==13124== 
==13124== Invalid read of size 4
==13124==    at 0x80B50E0: Perl_pp_entersub (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  Address 0xfffbd9ae is not stack'd, malloc'd or (recently) free'd
==13124== 
==13124== 
==13124== Process terminating with default action of signal 11 (SIGSEGV)
==13124==  Access not within mapped region at address 0xFFFBD9AE
==13124==    at 0x80B50E0: Perl_pp_entersub (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x815908A: Perl_runops_standard (in /home/mauke/usr/local/bin/perl)
==13124==    by 0x4DB97595: (below main) (in /lib/libc-2.15.so)
==13124==  If you believe this happened as a result of a stack
==13124==  overflow in your program's main thread (unlikely but
==13124==  possible), you can try to increase the size of the
==13124==  main thread stack using the --main-stacksize= flag.
==13124==  The main thread stack size used in this run was 8388608.
==13124== 
==13124== HEAP SUMMARY:
==13124==     in use at exit: 383,487 bytes in 2,898 blocks
==13124==   total heap usage: 6,809 allocs, 3,911 frees, 819,299 bytes allocated
==13124== 
==13124== LEAK SUMMARY:
==13124==    definitely lost: 388 bytes in 1 blocks
==13124==    indirectly lost: 4,764 bytes in 95 blocks
==13124==      possibly lost: 132,139 bytes in 198 blocks
==13124==    still reachable: 246,196 bytes in 2,604 blocks
==13124==         suppressed: 0 bytes in 0 blocks
==13124== Rerun with --leak-check=full to see details of leaked memory
==13124== 
==13124== For counts of detected and suppressed errors, rerun with: -v
==13124== ERROR SUMMARY: 219 errors from 39 contexts (suppressed: 0 from 0)


Here's the code:

#!perl
use strict;
use warnings;

sub eval_string {
    my ($code) = @_;
    my $v = eval $code;
    die $@ if $@;
    $v
}

sub _auto_gen {
    my ($name) = @_;
    my $proto = prototype "CORE::$name" || die "No prototype found for CORE::$name";
    $proto eq '$' ? eval_string("sub { $name \$_[0] }") :
    die "Prototype ($proto) not implemented for CORE::$name"
}

sub _auto {
    my ($name) = @_;
    no strict 'refs';
    $name => *{"CORE::$name"}{CODE} || _auto_gen($name)
}

sub _filetest {
    my ($name) = @_;
    $name => eval_string("sub { -$name \$_[0] }")
}

sub _scalar {
    my ($name) = @_;
    no strict 'refs';
    $name => *{"CORE::$name"}{CODE} || eval_string("sub { $name \$_[0] }")
}

my %functions = (
    (map _filetest($_), qw(
        r w x o
        R W X O
        e z s
        f d l p S b c t
        u g k
        T B
        M A C
    )),

    _auto('abs'),
    _auto('alarm'),
    _auto('atan2'),
    bless => sub { ... },
    _auto('chdir'),
    _auto('chr'),
    _auto('chroot'),
    _auto('cos'),
    _auto('crypt'),
    _auto('defined'),
    delete => sub { ... },
    _scalar('die'),
    each => sub { ... },
    _scalar('eval'),
    exec => sub { ... },
    exists => sub { ... },
    _auto('exit'),
    _auto('exp'),
    $^V ge v5.16.0 ? _auto('fc') : (),
    _auto('getpgrp'),
    _auto('getpwnam'),
    _auto('getgrnam'),
    _auto('gethostbyname'),
    _auto('getnetbyname'),
    _auto('getprotobyname'),
    _auto('getpwuid'),
    _auto('getgrgid'),
    _auto('getservbyname'),
    _auto('gethostbyaddr'),
    _auto('getnetbyaddr'),
    _auto('getprotobynumber'),
    _auto('getservbyport'),
    _auto('glob'),
    _auto('gmtime'),
    _scalar('goto'),
    grep => sub { ... },
    _auto('hex'),
    _auto('index'),
    _auto('int'),
    join => sub { ... },
    keys => sub { ... },
    _auto('lc'),
    _auto('lcfirst'),
    _auto('length'),
    _auto('link'),
    _auto('localtime'),
    _auto('log'),
    _auto('lstat'),
    map => sub { ... },
    _auto('mkdir'),
    _auto('oct'),
    _auto('ord'),
    pop => sub { ... },
    pos => sub { ... },
    _auto('prototype'),
    push => sub { ... },
    _auto('quotemeta'),
    _auto('rand'),
    _auto('readlink'),
    _auto('ref'),
    _auto('rename'),
    _auto('require'),
    _auto('rindex'),
    _auto('rmdir'),
    shift => sub { ... },
    _auto('sin'),
    _auto('sleep'),
    sort => sub { ... },
    splice => sub { ... },
    split => sub { ... },
    _auto('sprintf'),
    _auto('sqrt'),
    _auto('srand'),
    _auto('stat'),
    _auto('substr'),
    _auto('symlink'),
    _auto('syscall'),
    system => sub { ... },
    _auto('truncate'),
    _auto('uc'),
    _auto('ucfirst'),
    _auto('umask'),
    _scalar('unlink'),
    _auto('unpack'),
    unshift => sub { ... },
    values => sub { ... },
    _auto('vec'),
    _auto('waitpid'),
    _scalar('warn'),
);

__END__


[Please do not change anything below this line]
-----------------------------------------------------------------
---
Flags:
    category=core
    severity=medium
---
This perlbug was built using Perl 5.12.1 - Thu Jun  3 20:09:15 CEST 2010
It is being executed now by  Perl 5.18.1 - Tue Aug 13 07:08:47 CEST 2013.

Site configuration information for perl 5.18.1:

Configured by mauke at Tue Aug 13 07:08:47 CEST 2013.

Summary of my perl5 (revision 5 version 18 subversion 1) configuration:
   
  Platform:
    osname=linux, osvers=3.5.7-gentoo, archname=i686-linux
    uname='linux nora 3.5.7-gentoo #5 preempt sat jan 26 16:46:10 cet 2013 i686 amd athlon(tm) 64 processor 3200+ authenticamd gnulinux '
    config_args=''
    hint=recommended, useposix=true, d_sigaction=define
    useithreads=undef, usemultiplicity=undef
    useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=undef
    use64bitint=undef, use64bitall=undef, uselongdouble=undef
    usemymalloc=n, bincompat5005=undef
  Compiler:
    cc='cc', ccflags ='-fno-strict-aliasing -pipe -fstack-protector -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64',
    optimize='-O2 -flto',
    cppflags='-fno-strict-aliasing -pipe -fstack-protector -I/usr/local/include'
    ccversion='', gccversion='4.8.1', gccosandvers=''
    intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
    ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8
    alignbytes=4, prototype=define
  Linker and Libraries:
    ld='cc', ldflags ='-O2 -flto -fstack-protector -L/usr/local/lib'
    libpth=/usr/local/lib /lib/../lib /usr/lib/../lib /lib /usr/lib
    libs=-lnsl -lgdbm -ldb -ldl -lm -lcrypt -lutil -lc -lgdbm_compat
    perllibs=-lnsl -ldl -lm -lcrypt -lutil -lc
    libc=/lib/libc-2.15.so, so=so, useshrplib=false, libperl=libperl.a
    gnulibc_version='2.15'
  Dynamic Linking:
    dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E'
    cccdlflags='-fPIC', lddlflags='-shared -O2 -flto -L/usr/local/lib -fstack-protector'

Locally applied patches:
    SAVEARGV0 - disable magic open in <ARGV>

---
@INC for perl 5.18.1:
    /home/mauke/usr/local/lib/perl5/site_perl/5.18.1/i686-linux
    /home/mauke/usr/local/lib/perl5/site_perl/5.18.1
    /home/mauke/usr/local/lib/perl5/5.18.1/i686-linux
    /home/mauke/usr/local/lib/perl5/5.18.1
    .

---
Environment for perl 5.18.1:
    HOME=/home/mauke
    LANG=en_US.UTF-8
    LANGUAGE (unset)
    LC_COLLATE=POSIX
    LD_LIBRARY_PATH=/home/mauke/usr/local/lib
    LOGDIR (unset)
    PATH=/home/mauke/usr/perlbrew/bin:/home/mauke/usr/local/bin:/usr/local/bin:/usr/bin:/bin:/opt/bin:/usr/i686-pc-linux-gnu/gcc-bin/4.6.3:/opt/sun-jdk-1.4.2.13/bin:/opt/sun-jdk-1.4.2.13/jre/bin:/opt/sun-jdk-1.4.2.13/jre/javaws:/opt/dmd/bin:/usr/games/bin
    PERLBREW_BASHRC_VERSION=0.43
    PERLBREW_HOME=/home/mauke/.perlbrew
    PERLBREW_PATH=/home/mauke/usr/perlbrew/bin
    PERLBREW_ROOT=/home/mauke/usr/perlbrew
    PERLBREW_VERSION=0.27
    PERL_BADLANG (unset)
    PERL_UNICODE=SAL
    SHELL=/bin/bash


Thread Previous


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About