On Mon Mar 09 00:51:53 2015, Mouq wrote:
> On Sun Mar 08 17:53:18 2015, Mouq wrote:
> > On Thu Feb 19 23:22:42 2015, hmbrand wrote:
> > >
> > > $ echo -n "A+B+C+D+" >xx.txt
> > > $ perl -wE'$/="+";say while<>' xx.txt
> > > A+
> > > B+
> > > C+
> > > D+
> > > $ perl6 -e 'use v6;$*IN.input-line-separator="+";.say for
> > > lines():eager' xx.txt
> > > A+B+C+D+
> >
> > Output on most recent Moar build:
> >
> > $ echo "A+B+C+" | perl6 -e 'use v6;$*IN.input-line-separator="+";.say
> > for lines():eager'
> > A+
> > B+
> > C+
> >
> > A test was added in Roast commit:
> >
> > commit 0cc81eb5c18283dd3c365bd26609be0dd05c6105
> > Author: Mouq <[email protected]>
> > Date:   Sun Mar 8 20:47:52 2015 -0400
> >
> > Add test for RT #123888
> 
> Oops, this ticket is not actually closed. From IRC:
> 
> 07:01 < [Tux]> .tell Mouq
> https://gist.github.com/Tux/3efcf2bbcb859a27ef6a <= RT#123888 is
> incomplete. reopen?
> 07:02 < [Tux]> note that there is no newline *at all* in my example,
> incontrast to the example that shows the current fix
> 
> So the problem was actually not solved, and has to do with invoking
> perl6 with a file supplied to @*ARGS. In zsh:
> 
> $ perl6 -e 'use Test; $*IN.input-line-separator="+"; is +lines(), 3'
> =(echo "A+B+C+")
> not ok 1 -
> 
> # Failed test at -e line 1
> # expected: '3'
> #      got: '1'
> 
> (where =(…) is just zsh syntax to make a tmpfile with the command and
> give back the tmpfile's name)

Fixed now with various recent separator related improvements, and test added in 
S16-filehandles/argfiles.t.

/jnthn

Reply via email to