++ to anyone that can rewrite that in Lingua::Romana::Perligata (although I don't know if it handles regexes yet)