On Sat, Mar 23, 2013 at 09:49:12AM -0500, Reini Urban wrote: > No, it actually follows the old behavior: silently ignore and go on. Ah I was confused by this: +#define CHECK_SAFESYSCALLS(what,pv) \ + if (SvPOK(pv)) { \ + char *i; \ + char *p = SvPVX(pv); \ + if ( (i = strchr(p, 0))&&(i-p)&&((size_t)(i-p)<SvCUR(pv)-1) ) { \ + SETERRNO(EINVAL, LIB_INVARG); \ + if (ckWARN(WARN_SAFESYSCALLS)) \ + Perl_croak(aTHX_ "Invalid \\0 character in %s: %s\\0%s",\ + what,p,++i); \ where you SETERRNO even when not warning. What purpose does that serve? -- You're only as old as you look.Thread Previous | Thread Next