in reply to Splitting output of a system command into an array

A two-dimensional array from free(1) output: 
my @lines = `free`;  
for (@lines) {
    push @words, [ split /\s+/, $_ ];
}
print $words[0]->[3],"\n";

[download]
That prints 'free'. See perlref and perlreftut for the [ ] array reference constructor.

--shmem 

_($_=" "x(1<<5)."?\n".q·/)Oo.  G°\        /
                              /\_¯/(q    /
----------------------------  \__(m.====·.(_("always off the crowd"))."·
");sub _{s./.($e="'Itrs `mnsgdq Gdbj O`qkdq")=~y/"-y/#-z/;$e.e && print}

In Section Seekers of Perl Wisdom