perl: segfault

[Tomasz Pala]

test:

#v+
#!/usr/bin/perl

use open OUT => ':locale';

if(open F,"/etc/shadow") {
} else {
	print "$!\n";
	warn "$!\n";
}
#v-

~/rpm/vfmg: ./test
Permission denied
Permission denied
~/rpm/vfmg: LANG=pl_PL ./test
"\x{00ea}" does not map to iso-8859-2 at ./test line 7.
Brak dost\x{00ea}pu
zsh: segmentation fault  LANG=pl_PL ./test

Czy to jest PLD-specific, czy mam pisać na jakąś grupę perlową?

-- 
GoTaR <priv0.onet.pl->gotar>                                     USA sux
http://www.pld-linux.org/Members/gotar/     http://vfmg.sourceforge.net/
http://mops.uci.agh.edu.pl/~gotar/        http://informatica.agh.edu.pl/