[[email protected] - Tue Nov 16 11:38:05 2004]:
This is a bug report for perl from [email protected],
generated with the help of perlbug 1.35 running under perl v5.8.4.
#!/usr/local/bin/perl
my $TEXT = "";
for (my $i=0;$i<11500;$i++) {
$TEXT .= "x";
}
$TEXT =~ s/(x?)+//g;
This is a bug report for perl from [email protected],
generated with the help of perlbug 1.35 running under perl v5.8.4.
#!/usr/local/bin/perl
my $TEXT = "";
for (my $i=0;$i<11500;$i++) {
$TEXT .= "x";
}
$TEXT =~ s/(x?)+//g;
[email protected]:~/smoke/perl-current$ perl rt_32465.pl
Segmentation fault
[email protected]:~/smoke/perl-current$ ./perl rt_32465.pl
[email protected]:~/smoke/perl-current$ cat rt_32465.pl
#!perl
my $TEXT = "";
for (my $i=0;$i<11500;$i++) {
$TEXT .= "x";
}
$TEXT =~ s/(x?)+//g;
