F
Frank Seitz
Hi!
#!/usr/bin/perl
use strict;
use warnings;
my $stderr;
close STDERR;
open STDERR,'>',\$stderr or die;
warn "a\n";
$stderr =~ s/./xx/g;
# eof
$ ./test.pl
Segmentation fault
What is the problem?
$ perl -v
This is perl, v5.10.1 (*) built for i686-linux
Frank
--
Dipl.-Inform. Frank Seitz
Anwendungen für Ihr Internet und Intranet
Tel: 04103/180301; Fax: -02; Industriestr. 31, 22880 Wedel
Blog: http://www.fseitz.de/blog
XING-Profil: http://www.xing.com/profile/Frank_Seitz2
#!/usr/bin/perl
use strict;
use warnings;
my $stderr;
close STDERR;
open STDERR,'>',\$stderr or die;
warn "a\n";
$stderr =~ s/./xx/g;
# eof
$ ./test.pl
Segmentation fault
What is the problem?
$ perl -v
This is perl, v5.10.1 (*) built for i686-linux
Frank
--
Dipl.-Inform. Frank Seitz
Anwendungen für Ihr Internet und Intranet
Tel: 04103/180301; Fax: -02; Industriestr. 31, 22880 Wedel
Blog: http://www.fseitz.de/blog
XING-Profil: http://www.xing.com/profile/Frank_Seitz2