Subject: | t/43-write_failure.t may fail in a non-English locale (1.44_01) |
If running the 1.44_01 test suite under a German locale, then the following error happens:
# Failed test 'croak if file can't be written to'
# at t/43-write_failure.t line 28.
# '
# Devel::Examine::Subs::_write_file() speaking...
#
# File::Edit::Portable::write() returned a failure status.
#
# can't open file /usr/bin/no_write.data for writing!: Zugriff verweigert at /usr/home/eserte/.cpan/build/2015092918/Devel-Examine-Subs-1.44_01-Hz2ukr/blib/lib/Devel/Examine/Subs.pm line 729.
# at t/43-write_failure.t line 25.
# '
# doesn't match '(?^i:permission denied)'
# Looks like you failed 1 test of 2.
t/43-write_failure.t .......................
Dubious, test returned 1 (wstat 256, 0x100)
Failed 1/2 subtests
Note that this happens only for perls < 5.22.0 --- probably because errno+locale handling changed in perl 5.22.0. In any way, it would be better if you would check for numeric $! if it's available, or otherwise try to force an English locale early (e.g. by setting LC_ALL=C LANGUAGE=en or so).