I just tried to reproduce this on "perl6 version 2014.03.01 built on parrot 6.1.0 revision 0" and failed. (I.e. the code terminated correctly).
That might be a clue. On 4/21/14, Carl Mäsak <perl6-bugs-follo...@perl.org> wrote: > # New Ticket Created by "Carl Mäsak" > # Please include the string: [perl #121693] > # in the subject line of all future correspondence about this issue. > # <URL: https://rt.perl.org/Ticket/Display.html?id=121693 > > > > $ perl6 -v > This is perl6 version 2014.04-5-g921615b built on MoarVM version 2014.04 > > $ cat > foo > a > b > c > $ perl6 -e 'given open("foo") { .say for .lines }' > a > b > c > > So far, so good, but... > > $ ln -s foo bar > $ perl6 -e 'given open("bar") { .say for .lines }' > a > b > c > <an infinitude of infinite lines, snipped for your convenience> > > Expected latter program to give output identical to the former. >
