Front page | perl.perl5.porters |
Postings from January 2014
[perl #121112] only warn about \n in failed file op if newline is trailing
Thread Next
From:
Ricardo SIGNES
Date:
January 29, 2014 14:16
Subject:
[perl #121112] only warn about \n in failed file op if newline is trailing
Message ID:
rt-4.0.18-13211-1391004951-933.121112-75-0@perl.org
# New Ticket Created by Ricardo SIGNES
# Please include the string: [perl #121112]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org/Ticket/Display.html?id=121112 >
This is a bug report for perl from rjbs@cpan.org,
generated with the help of perlbug 1.39 running under perl 5.18.2.
-----------------------------------------------------------------
[Please describe your issue here]
After reading #121085, Peter Rabbitson noted that the "Unsuccessful %s on
filename containing newline" is triggered even if the newline is within the
middle of a string. If the problem we're guarding against is failure to chomp,
we could only issue this warning at the end.
If we think it's important to also protect against (say) bad input record
separator or failure to split(), then we can update the docs, but I think that
the failure to chomp is the bigger deal, and we could reduce false positives.
[Please do not change anything below this line]
-----------------------------------------------------------------
---
Flags:
category=core
severity=low
---
Site configuration information for perl 5.18.2:
Configured by rjbs at Sun Dec 22 09:22:03 EST 2013.
Summary of my perl5 (revision 5 version 18 subversion 2) configuration:
Platform:
osname=darwin, osvers=13.0.0, archname=darwin-2level
uname='darwin walrus.local 13.0.0 darwin kernel version 13.0.0: thu sep 19 22:22:27 pdt 2013; root:xnu-2422.1.72~6release_x86_64 x86_64 '
config_args='-Dprefix=/Users/rjbs/.plenv/versions/18.2 -de -Dusedevel -A'eval:scriptdir=/Users/rjbs/.plenv/versions/18.2/bin''
hint=recommended, useposix=true, d_sigaction=define
useithreads=undef, usemultiplicity=undef
useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=undef
use64bitint=define, use64bitall=define, uselongdouble=undef
usemymalloc=n, bincompat5005=undef
Compiler:
cc='cc', ccflags ='-fno-common -DPERL_DARWIN -fno-strict-aliasing -pipe -fstack-protector -I/usr/local/include -I/opt/local/include',
optimize='-O3',
cppflags='-fno-common -DPERL_DARWIN -fno-strict-aliasing -pipe -fstack-protector -I/usr/local/include -I/opt/local/include'
ccversion='', gccversion='4.2.1 Compatible Apple LLVM 5.0 (clang-500.2.79)', gccosandvers=''
intsize=4, longsize=8, ptrsize=8, doublesize=8, byteorder=12345678
d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16
ivtype='long', ivsize=8, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8
alignbytes=8, prototype=define
Linker and Libraries:
ld='env MACOSX_DEPLOYMENT_TARGET=10.3 cc', ldflags =' -fstack-protector -L/usr/local/lib -L/opt/local/lib'
libpth=/usr/local/lib /opt/local/lib /usr/lib
libs=-lgdbm -ldbm -ldl -lm -lutil -lc
perllibs=-ldl -lm -lutil -lc
libc=, so=dylib, useshrplib=false, libperl=libperl.a
gnulibc_version=''
Dynamic Linking:
dlsrc=dl_dlopen.xs, dlext=bundle, d_dlsymun=undef, ccdlflags=' '
cccdlflags=' ', lddlflags=' -bundle -undefined dynamic_lookup -L/usr/local/lib -L/opt/local/lib -fstack-protector'
Locally applied patches:
RC4
---
@INC for perl 5.18.2:
/Users/rjbs/.plenv/versions/18.2/lib/perl5/site_perl/5.18.2/darwin-2level
/Users/rjbs/.plenv/versions/18.2/lib/perl5/site_perl/5.18.2
/Users/rjbs/.plenv/versions/18.2/lib/perl5/5.18.2/darwin-2level
/Users/rjbs/.plenv/versions/18.2/lib/perl5/5.18.2
.
---
Environment for perl 5.18.2:
DYLD_LIBRARY_PATH (unset)
HOME=/Users/rjbs
LANG=en_US.UTF-8
LANGUAGE (unset)
LD_LIBRARY_PATH (unset)
LOGDIR (unset)
PATH=/Users/rjbs/.plenv/versions/18.2/bin:/Users/rjbs/.plenv/libexec:/Users/rjbs/.plenv/plugins/perl-build/bin:/Users/rjbs/bin:/Users/rjbs/.rbenv/shims:/Users/rjbs/.rbenv/bin:/Users/rjbs/.plenv/shims:/Users/rjbs/.plenv/bin:/opt/local/bin:/opt/local/sbin:/usr/bin:/bin:/usr/sbin:/sbin:/usr/local/bin:/opt/X11/bin:/Users/rjbs/bin:/Users/rjbs/.../bin:/Users/rjbs/code/hla
PERLDOC=-n/opt/local/bin/groff
PERL_AUTOINSTALL=--skipdeps
PERL_BADLANG (unset)
PERL_MAILERS=sendmail:/Users/rjbs/bin/sendmail
SHELL=/opt/local/bin/zsh
Thread Next
-
[perl #121112] only warn about \n in failed file op if newline is trailing
by Ricardo SIGNES