Re: Need awk print sub

2017-08-04 Thread ToddAndMargo
On 08/04/2017 03:42 PM, Brandon Allbery wrote: On Fri, Aug 4, 2017 at 6:28 PM, ToddAndMargo > wrote: Here is my last attempt: ip -o -f inet addr show | perl6 -e 'for ( lines ) -> $I { if ( $I ~~ /enp/ ) { say "Interface <" ~

Re: Need awk print sub

2017-08-04 Thread ToddAndMargo
On 08/04/2017 02:13 PM, Brandon Allbery wrote: (back on the desktop for the moment...) On Fri, Aug 4, 2017 at 5:04 PM, ToddAndMargo > wrote: On 08/04/2017 01:00 PM, ToddAndMargo wrote: How do I do this with a perl one liner?

Re: Need awk print sub

2017-08-04 Thread ToddAndMargo
On 08/04/2017 02:31 PM, Elizabeth Mattijsen wrote: On 4 Aug 2017, at 22:53, ToddAndMargo wrote: On 08/04/2017 01:26 PM, Elizabeth Mattijsen wrote: echo "a b c d" | perl6 -e 'say words[1]’ Tears. :'( $ echo "a b c d" | perl6 -e 'say words[1]' ===SORRY!=== Error

Re: Need awk print sub

2017-08-04 Thread ToddAndMargo
On 08/04/2017 01:00 PM, ToddAndMargo wrote: Hi All, How do I do this with a perl one liner? $ echo "a b c d" | awk '{print $2}' b Many thanks, -T And it is getting weirder: $ echo "a b c d" | perl6 -n -e 'say lines ~ "\n" ~ .words[2];' ( c) without "-n" ".words" doesn't work. With "-n"

Re: Need awk print sub

2017-08-04 Thread ToddAndMargo
On 08/04/2017 01:53 PM, ToddAndMargo wrote: $ echo "a b c d" | perl6 -e 'say words[1]' And with the . before words $ echo "a b c d" | perl6 -e 'say .words[1]' No such method 'words' for invocant of type 'Any' in block at -e line 1

Re: Need awk print sub

2017-08-04 Thread ToddAndMargo
>> Hi All, >> >> How do I do this with a perl one liner? >> >> $ echo "a b c d" | awk '{print $2}' >> b >> >> Many thanks, >> -T On 08/04/2017 01:31 PM, Patrick R. Michaud wrote: How about... $ echo "a b c d" | ./perl6 -n -e '.words[1].say' b Pm On Fri, Aug 04, 2017 at 01:00:52PM -0700,

Re: Need awk print sub

2017-08-04 Thread ToddAndMargo
On 08/04/2017 01:26 PM, Elizabeth Mattijsen wrote: echo "a b c d" | perl6 -e 'say words[1]’ Tears. :'( $ echo "a b c d" | perl6 -e 'say words[1]' ===SORRY!=== Error while compiling -e Calling words() will never work with any of these multi signatures: ($what, $limit = Inf, *%named) at

Re: Need awk print sub

2017-08-04 Thread Patrick R. Michaud
How about... $ echo "a b c d" | ./perl6 -n -e '.words[1].say' b Pm On Fri, Aug 04, 2017 at 01:00:52PM -0700, ToddAndMargo wrote: > Hi All, > > How do I do this with a perl one liner? > > $ echo "a b c d" | awk '{print $2}' > b > > Many thanks, > -T

Re: Need awk print sub

2017-08-04 Thread Elizabeth Mattijsen
> On 4 Aug 2017, at 22:00, ToddAndMargo wrote: > > Hi All, > > How do I do this with a perl one liner? > > $ echo "a b c d" | awk '{print $2}' > b echo "a b c d" | perl6 -e 'say words[1]’ Note array indices in Perl 6 are 0 based.

Need awk print sub

2017-08-04 Thread ToddAndMargo
Hi All, How do I do this with a perl one liner? $ echo "a b c d" | awk '{print $2}' b Many thanks, -T