Front page | perl.perl5.porters |
Postings from November 2016
Re: Indented here docs?
Thread Previous
|
Thread Next
From:
Andreas Koenig
Date:
November 16, 2016 11:45
Subject:
Re: Indented here docs?
Message ID:
87shqrmyvr.fsf@k85.linux.bogus
>>>>> On Mon, 14 Nov 2016 08:44:10 -0500, "Matthew Horsfall (alh)" <wolfsage@gmail.com> said:
> Indented here-docs are now in blead.
> Enjoy!
Fails for me unter TEST. Passes all tests under harness.
: % git describe
: v5.25.6-264-g945fff0
: % (cd t && ./perl TEST -v ../t/op/heredoc.t)
: t/../t/op/heredoc ... 1..137
: ok 1 - no terminating newline in string-eval
: ok 2 - heredoc at EOF without trailing newline
: ok 3 - blank-terminated heredoc at EOF
: ok 4 - blank-terminated heredoc at EOF and no semicolon
: ok 5 - crlf-terminated heredoc
: ok 6 - no warning for qq|${\<<foo}| in file
: ok 7 - string terminator must start at newline
: ok 8 - empty string terminator still needs a newline (length 1)
: ok 9 - empty string terminator still needs a newline (length 2)
: ok 10 - empty string terminator still needs a newline (length 3)
: ok 11 - empty string terminator still needs a newline (length 4)
: ok 12 - empty string terminator still needs a newline (length 5)
: ok 13 - empty string terminator still needs a newline (length 6)
: ok 14 - empty string terminator still needs a newline (length 7)
: ok 15 - empty string terminator still needs a newline (length 8)
: ok 16 - empty string terminator still needs a newline (length 9)
: ok 17 - empty string terminator still needs a newline (length 10)
: ok 18 - empty string terminator still needs a newline (length 11)
: ok 19 - empty string terminator still needs a newline (length 12)
: ok 20 - empty string terminator still needs a newline (length 13)
: ok 21 - empty string terminator still needs a newline (length 14)
: ok 22 - empty string terminator still needs a newline (length 15)
: ok 23 - empty string terminator still needs a newline (length 16)
: ok 24 - empty string terminator still needs a newline (length 17)
: ok 25 - empty string terminator still needs a newline (length 18)
: ok 26 - empty string terminator still needs a newline (length 19)
: ok 27 - empty string terminator still needs a newline (length 20)
: ok 28 - empty string terminator still needs a newline (length 21)
: ok 29 - empty string terminator still needs a newline (length 22)
: ok 30 - empty string terminator still needs a newline (length 23)
: ok 31 - empty string terminator still needs a newline (length 24)
: ok 32 - empty string terminator still needs a newline (length 25)
: ok 33 - empty string terminator still needs a newline (length 26)
: ok 34 - empty string terminator still needs a newline (length 27)
: ok 35 - empty string terminator still needs a newline (length 28)
: ok 36 - empty string terminator still needs a newline (length 29)
: ok 37 - empty string terminator still needs a newline (length 30)
: ok 38 - empty string terminator still needs a newline (length 31)
: ok 39 - long terminator fails correctly
: ok 40 - don't use an invalid oldoldbufptr
: ok 41 - don't use an invalid oldoldbufptr (some more)
: ok 42 - Don't assert parsing a here-doc if we hit EOF early
: ok 43 - delimcpy(): handle last char being backslash properly
: ok 44 - Indented here-doc: print <<~\EOF
: some data
: FAILED--unexpected output at test 44
: Failed 1 test out of 1, 0.00% okay.
: ../t/op/heredoc.t
: ### Since not all tests were successful, you may want to run some of
: ### them individually and examine any diagnostic messages they produce.
: ### See the INSTALL document's section on "make test".
: ### You may have to set your dynamic library search path,
: ### LD_LIBRARY_PATH, to point to the build directory:
: ### setenv LD_LIBRARY_PATH `pwd`; cd t; ./perl harness
: ### LD_LIBRARY_PATH=`pwd`; export LD_LIBRARY_PATH; cd t; ./perl harness
: ### export LD_LIBRARY_PATH=`pwd`; cd t; ./perl harness
: ### for csh-style shells, like tcsh; or for traditional/modern
: ### Bourne-style shells, like bash, ksh, and zsh, respectively.
: Elapsed: 1 sec
: u=0.01 s=0.00 cu=0.03 cs=0.02 scripts=1 tests=137
: zsh: exit 1 ( cd t && ./perl TEST -v ../t/op/heredoc.t; )
Let me know if you need further info,
--
andreas
Thread Previous
|
Thread Next