[perl-Algorithm-NaiveBayes: 5/7] New version for review