sub wordBreak {
   my ($string)   =  @_;
   return $string =~ /\S+/g;
}