Thanks Yary! So that means Brian's answer in Raku can use the smartmatch operator instead of the "==". Good to know!
~$ raku -ne '.say if ++$ ~~ 3|5|11' test_lines.txt Line 3 Line 5 Line 11 On Mon, Aug 31, 2020 at 8:47 AM yary <not....@gmail.com> wrote: > > Aww don't you remember Raku's earliest(?) contribution to Perl? I was so > happy when this arrived, and sad over its subsequent neglect > > perl -ne 'no warnings "experimental"; print if $. ~~ [3,5,11]' line0-10.txt > > > -y > > > On Mon, Aug 31, 2020 at 8:28 AM William Michels via perl6-users > <perl6-us...@perl.org> wrote: >> >> How would P5 handle line numbers > 10 ? Not getting back line #11 with >> the P5 examples below: >> >> $ raku -ne '.say if ++$ == 3|2|5|11' test_lines.txt >> Line 2 >> Line 3 >> Line 5 >> Line 11 >> >> ~$ perl -ne 'print if $. =~ /\b[3 2 5 11]\b/' test_lines.txt >> Line 1 >> Line 2 >> Line 3 >> Line 5 >> >> ~$ perl -ne 'print if $. =~ /\b[3,2, 5, 11]\b/' test_lines.txt >> Line 1 >> Line 2 >> Line 3 >> Line 5 >> >> On Mon, Aug 31, 2020 at 8:17 AM Brian Duggan <bdug...@matatu.org> wrote: >> > >> > On Monday, August 31, Andy Bach wrote: >> > > > raku -ne '.say if $++ == 3|2|5' Lines.txt >> > > >> > > OT, maybe, but is >> > > perl -ne 'print if $. =~ /\b[325]\b/' Lines.txt >> > > >> > > or >> > > perl -ne 'print if $c++ =~ /\b[436]\b/' Lines.txt >> > > >> > > the best you can do in P5? >> > >> > I can't think of anything better :-) >> > >> > Brian
