my $word_count = int(split(' ', $string)); #### my $word_count = scalar(my @words = split(' ', $string)); #### $string =~ s/(\s+)/$1/g;
## my $word_count = scalar(my @words = split(' ', $string)); ##
## $string =~ s/(\s+)/$1/g;