in reply to format 1 line per row

I got it working using split.
for (($mb, $mfre, $used, $mt) = +(split(" ", $_, 0))[1,2,3,6]) {