Rapid optical method for procyanidins estimation in red wines