while (<$syscmd>)
{
    my @temp = split ' ';
    push @list, $temp[3];
}