Front page | perl.perl5.porters |
Postings from May 2004
# New Ticket Created by Tomasz Pala
# Please include the string: [perl #29437]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org:80/rt3/Ticket/Display.html?id=29437 >
Hi!
Here's the sample code:
#v+
#!/usr/bin/perl
use open OUT => ':locale';
open F,'/etc/shadow';
warn "$!\n";
#v-
If one runs it from unprivileged account he gets "Permission denied"
UNLESS he had set locale producing error message with national letters,
e.g. "Brak dostępu" in polish (eogonek between 't' and 'p'):
LC_ALL=pl_PL ./perl-test
zsh: segmentation fault LC_ALL=pl_PL ./perl-test
--
Tom Pala <gotar@pld-linux.org> http://vfmg.sourceforge.net/
http://www.pld-linux.org/Members/gotar/
Thread Previous
|
Thread Next