Perl extension for naive bayesian classification using Redis as a storage backend