my @array = split /\s+/, $string;