On Friday, April 13, Fernando Santagata wrote:
Hi,
Since "There's More Than One Way To Do It", one can look for the value,
instead of the separator:
$ echo "total kB 180448 2980 112" |perl6 -n -e 'say
.comb(/\d+/)[1]'
2980
On Fri, Apr 13, 2018 at 12:31 PM, Shlomi Fish <[email protected]>
wrote:
Hi Todd,
On Fri, 13 Apr 2018 03:00:22 -0700
ToddAndMargo <[email protected]> wrote:
echo "total kB 180448 2980 112" | awk '{print $4}')
shlomif[Perl6]:$trunk$ echo "total kB 180448 2980 112" |
perl6
-n -e 'say .split(/\s+/)[3]'
2980
shlomif[Perl6]:$trunk$ echo "total kB 180448 2980 112" |
awk
'{print $4}'
2980
See https://docs.perl6.org/language/5to6-nutshell#-a and
http://perldoc.perl.org/perlrun.html .
Fernando Santagata
On 04/13/2018 05:20 AM, Brian Duggan wrote:
One could also use .words --
$ echo "total kB 180448 2980 112" |perl6 -n -e 'say .words[3]'
2980
Brian
That almost exactly matches awk and I don't have to
wonder about what each value is made up of. I love it.
Thank you!
-T
--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Computers are like air conditioners.
They malfunction when you open windows
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
