@array = split /\s/, $string, 2;