@sentence = split /\s/,"perlmonk perlmonk perlmonk "; 
$numWords = @sentence;