perl kentfredric@gmail.com Kent Fredric String::Flogger String-Flogger