DaveChild / Text-Statistics

        $intSyllableCount = 0;

        $arrWords = explode(' ', $strText);

        $intWordCount = count($arrWords);

        for ($i = 0; $i < $intWordCount; $i++) {

            $intSyllableCount += self::syllableCount($arrWords[$i], $strEncoding);

        }

        return $intSyllableCount;

    }

        $intSyllableCount = 0;

        $intWordCount = Text::wordCount($strText, $strEncoding);

        $arrWords = explode(' ', $strText);

        for ($i = 0; $i < $intWordCount; $i++) {

            $intSyllableCount += self::syllableCount($arrWords[$i], $strEncoding);

        }

        $averageSyllables = (Maths::bcCalc($intSyllableCount, '/', $intWordCount));

        return $averageSyllables;

    }