Первые шаги:
===
#!/usr/bin/env perl

use Lingua::Romana::Perligata;

huic nullum da.
hoc egresso scribe.
novumversum egresso scribe.

listis I tum II tum III da.
per quisque in listis fac sic
hoc tum novumversum egresso scribe
cis.
===
Может быть, модуль какой перепишу.