$four = (split /\s+/, $_, 5) [3];