#!/usr/bin/perl

@arr = split /\s+/, 'root     30341  0.0  0.7  1468 1008  ?  S    15:44   0:00 sendmail: server IDENT:root@bar.foobar.es [212.7.33.22] cmd read';

foreach($var, @arr) {
 print "$var\n";
}