On 2020-08-24 20:30, ToddAndMargo via perl6-users wrote:
On Mon, Aug 24, 2020 at 11:08 PM ToddAndMargo via perl6-users
<perl6-us...@perl.org> wrote:
On 2020-08-24 19:35, ToddAndMargo via perl6-users wrote:
Hi All,
I seems I should know how to do this, but
I am drawing a blank.
$ cat Lines.txt | raku -ne 'say $_;'
Line 1
Line 2
Line 3
Line 4
Line 5
Line 6
Line 7
Line 8
Line 9
Line 10
Line 11
I want to print liens 1, 3, and 7.
Assigning `my @x=$_.lines` puts everything into $x[0]
Many thanks,
-T
This is what I have so far:
$ cat Lines.txt
Line 0
Line 1
Line 2
Line 3
Line 4
Line 5
Line 6
Line 7
Line 8
Line 9
Line 10
Line 11
$ cat Lines.txt | raku -e ' my @x=$*IN.lines; for @x[3,2,5] {say $_};'
Line 3
Line 2
Line 5
is there a quicker way to get to the point?
Many thanks,
-T
On 2020-08-24 20:24, Curt Tilmes wrote:
$ cat Lines.txt | raku -e '.say for lines()[3,2,5]'
Love it! Thank you!
I suppose I'd better add I was looking
for a improvement
... | sed -n 'x,yp'
For my remaining bash programs