Lingua...rligata(3pm)
๐ NOMEN ๐
okay bestie, this is the manual page for Lingua::Romana::Perligata (3pm). It's literally Perl in Latin ๐
โจ. The title line was giving Lingua...rligata(3pm), but we're folding the full name in right here, no cap.
๐ EDITIO ๐
This document describes version 0.605 of Lingua::Romana::Perligata, released May 3, 2001. Yes, it's old enough to have its own MySpace. Iconic.
โจ SUMMARIUM โจ
Here's the vibe, code and all:
use Lingua::Romana::Perligata;
adnota Illud Cribrum Eratosthenis
maximum tum val inquementum tum biguttam tum stadium egresso scribe.
da meo maximo vestibulo perlegementum.
maximum comementum tum novumversum egresso scribe.
meis listis conscribementa II tum maximum da.
dum damentum nexto listis decapitamentum fac
sic
lista sic hoc tum nextum recidementum cis vannementa listis da.
dictum sic deinde cis tum biguttam tum stadium tum cum nextum
comementum tum novumversum scribe egresso.
cis
๐ฆ DESCRIPTIO ๐ฆ
Lingua::Romana::Perligata makes it possible to write Perl programs in Latin. And if you have to ask "Why?", then bestie, the answer probably won't make any sense to you either ๐.
The linguistic principles behind Perligata are described in:
http://www.csse.monash.edu.au/~damian/papers/HTML/Perligata.html
The module is "use"d at the start of the program, and installs a filter which allows the rest of the program to be written in (modified) Latin, as described in the following sections. Periodt.
๐ GRAMMATICA PERLIGATA ๐
๐ Variables ๐
To simplify the mind-numbingly complex rules of declension and conjugation that govern inflexions in Latin, Perligata treats all user-defined scalar and array variables as neuter nouns of the second declension โ singular for scalars, plural for arrays. It's giving grammar girlie.
Hashes represent something of a difficulty in Perligata, as Latin lacks an obvious way of distinguishing these "plural" variables from arrays. The solution that has been adopted is to depart from the second declension and represent hashes as masculine plural nouns of the fourth declension.
Hence, the type and role of all types variables are specified by their number and case.
When elements of arrays and hashes are referred to directly in Perl, the prefix of the container changes from "@" or "%" to "$". So it should not be surprising that Perligata also makes use of a different inflexion to distinguish these cases.
Indexing operations such as $array[$elem] or $hash{$key} might be translated as "elem of array" or "key of hash". This suggests that when arrays or hashes are indexed, their names should be rendered in the genitive (or possessive) case. Multi-level indexing operations ("$array[$row][$column]") mean "column of row of array", and hence the first indexing variable must also be rendered in the genitive.
Note that the current release of Perligata only supports homogeneous multi-level indexing. That is:"$lol[$row][$column]"or"$hoh{key}{subkey}{subsubkey}", but not"$lohol[$index1]{key}[$index2]".
The rules for specifying variables may be summarized as follows:
Perligata Number, Case, and Declension Perl Role
========= ============================ ==== ====
nextum accusative singular 2nd $next scalar rvalue
nexta accusative plural 2nd @next array rvalue
nextus accusative plural 4th %next hash rvalue
nexto dative singular 2nd $next scalar lvalue
nextis dative plural 2nd @next array lvalue
nextibus dative plural 4th %next hash lvalue
nexti genitive singular 2nd [$next]... scalar index
nextorum genitive plural 2nd $next[...] array element
nextuum genitive plural 4th $next{...} hash entry
In other words, scalars are always singular nouns, arrays and hashes are always plural (but of different declensions), and the case of the noun specifies its syntactic role in a statement: accusative for an rvalue, dative for an lvalue, genitive when being an index. Of course, because the inflection determines the syntactic role, the various components of a statement can be given in any order. For example, the Perl statement:
$last = $next;
could be expressed in Perligata as any of the following ("da" is the Perligata assignment operator โ see "Built-in functions and operators"):
lasto da nextum.
lasto nextum da.
nextum da lasto.
nextum lasto da.
da lasto nextum.
da nextum lasto.
The special form $#array is rendered via the Perligata verb admeta ("measure out"). See "Subroutines, operators, and functions".
The common punctuation variables $_ and @_ are special cases. $_ is often the value under implicit consideration (e.g. in pattern matches, or "for" loops) and so it is rendered as "this thing": hoc as an rvalue, huic as an lvalue, huius used as an intermediate index.
Similarly, @_ is implicitly the list of things passed into a subroutine, and so is rendered as "these things": haec as an rvalue, his as an lvalue, horum when indexed.
Other punctuation variables take the Latin forms of their English.pm equivalents (see "THESAURUS PERLIGATUS"), often with a large measure of poetic licence. For example, in Perligata, $/ is rendered as ianitorem or "gatekeeper".
The "numeral" variables โ $1, $2, etc. โ are rendered as synthetic compounds: parprimum ("the equal of the first"), parsecundum ("the equal of the second"), etc. When used as interim indices, they take their genitive forms: parprimi, parsecundi, etc. Since they cannot be used as an lvalue, they have no dative forms.
The one exception is $0 (the variable storing the name of the current program), which is programma in the accusative and programmati in the dative. It also has a genitive form (programmatis), though it's hard to imagine ever needing that.
The parameter variable (@ARGV) is rendered as parametra in the accusative, parametris in the dative, and parametrorum in the genetive. Its related filehandle (*ARGV) is always dative singular: parametro
๐ซถ "my", "our", and "local" ๐ซถ
In Perligata, the "my" modifier is rendered โ not surprisingly โ by the first person possessive pronouns: meo (conferring a scalar context) and meis (for a list context). Note that the modifier is always applied to a dative (lvalue), and hence is itself declined in that case. Thus:
meo varo haec da. # my $var = @_;
meis varo haec da. # my ($var) = @_;
meis varis haec da. # my @var = @_;
Similarly the "our" modifier is rendered as nostro or nostris, depending on the desired context.
The Perl "local" modifier is loco or locis in Perligata:
loco varo haec da. # local $var = @_;
locis varo haec da. # local ($var) = @_;
locis varis haec da. # local @var = @_;
This is particularly felicitous: not only is loco the Latin term from which the word "local" derives, it also means "in place of" (as in: in loco parentis). This meaning is much closer to the actual behaviour of the "local" modifier, namely to temporarily install a new symbol table entry in place of the current one. Lowkey iconic.
๐ง Subroutines, operators, and functions ๐ง
Functions, operators, and user-defined subroutines are represented as verbs or, in some situations, verbal nouns. The inflexion of the verb determines not only its syntactic role, but also its call context.
User-defined subroutines are the simplest group. To avoid ambiguities, they are all treated as verbs of the third conjugation. For example, here are the various conjugations for different usages for a user-defined subroutine count():
Perligata Number, Mood, etc Perl Role Context
========= ================= ==== ==== =======
countere infinitive sub count defn -
counte imperative sing. count() call void
countementum acc. sing. resultant count() call scalar
countementa acc. plur. resultant count() call list
countemento dat. sing. resultant count() call scalar lvalue
countementis dat. plur. resultant count() call list lvalue
The use of the infinitive as a subroutine definition is obvious: accipere would tell Perligata how "to accept"; spernere, how "to reject". So countere specifies how "to count".
The use of the imperative for void context is also straightforward: accipe commands Perligata to "accept!", sperne tells it to "reject!", and counte bids it "count!". In each case, an instruction is being given (and in a void context too, so no backchat is expected).
Handling scalar and list contexts is a little more challenging. The corresponding Latin must still have verbal properties, since an action is being performed upon objects. But it must also have the characteristics of a noun, since the result of the call will itself be used as the object (i.e. target or data) of some other verb. Fortunately, Latin has a rich assortment of verbal nouns โ far more than English โ that could fill this role.
Since it is the result of the subroutine call that is of interest here, the chosen solution was to use the -ementum suffix, which specifies the (singular, accusative) outcome of an action. This corresponds to the result of a subroutine called in a scalar context and used as data. For a list data context, the plural suffix -ementa is used, and for targets, the dative forms are used: -emento and -ementis. Of course, Perl does not (yet) support lvalue subroutines that return a list/array, so the -mentis suffix currently triggers an error.
Note that these resultative endings are completely consistent with those for variables. ๐
๐ฅ Built-in functions and operators ๐ฅ
Built-in operators and functions could have followed the same "dog-latin" pattern as subroutines. For example "shift" might have been shifte in a void context, shiftementa when used as data in an array context, shiftemento when used as a target in a scalar context, etc.
However, Latin already has a perfectly good verb with the same meaning as "shift": decapitare ("to behead"). Unfortunately, this verb is of the first conjugation, not the second, and hence has the imperative form decapita, which makes it look like a Perligata array in a data role.
Orthogonality has never been Perl's highest design criterion, so Perligata follows suit by eschewing bland consistency in favour of aesthetics. All Perligata keywords โ including function and operator names โ are therefore specified as correct Latin verbs, of whatever conjugation is required. For example:
Okay so the operator/function glow-up is literally giving โจmain characterโจ energy. Hereโs the whole vibe, no cap:
+โ literal meaning:"add"; in void context:adde; when used as scalar rvalue:addementum; when used as list rvalue:addementa.=โ literal meaning:"give"; in void context:da; when used as scalar rvalue:damentum; when used as list rvalue:damenta..โ literal meaning:"conjoin"; in void context:sere; when used as scalar rvalue:serementum; when used as list rvalue:serementa...โ literal meaning:"enlist"; in void context:conscribe; when used as scalar rvalue:conscribementum; when used as list rvalue:conscribementa.shiftโ literal meaning:"behead"; in void context:decapita; when used as scalar rvalue:decapitamentum; when used as list rvalue:decapitamenta.pushโ literal meaning:"stack"; in void context:cumula; when used as scalar rvalue:cumulamentum; when used as list rvalue:cumulamenta.popโ literal meaning:"unstack"; in void context:decumula; when used as scalar rvalue:decumulamentum; when used as list rvalue:decumulamenta.grepโ literal meaning:"winnow"; in void context:vanne; when used as scalar rvalue:vannementum; when used as list rvalue:vannementa.printโ literal meaning:"write"; in void context:scribe; when used as scalar rvalue:scribementum; when used as list rvalue:scribementa.writeโ literal meaning:"write below"; in void context:subscribe; when used as scalar rvalue:subscribementum; when used as list rvalue:subscribementa.dieโ literal meaning:"die"; in void context:mori; when used as scalar rvalue:morimentum; when used as list rvalue:morimenta.
The full list of Perligata keywords is provided in "THESAURUS PERLIGATUS" โ go check it, iykyk.
But ngl, consistency has not been entirely forsaken. The back-formations of inflexions for scalar and list context are entirely regular, and consistent with those for user-defined subroutines (described above). So itโs not chaotic, bestie.
A few Perl built-in functions โ "pos", "substr", "keys" โ can be used as lvalues. That is, they can be the target of some other action (typically of an assignment). In Perligata such cases are written in the dative singular (since the lvalues are always scalar). Note too that, because an assignment to an lvalue function modifies its first argument, that argument must be a target too, and hence must be written in the dative as well. ๐
Thus:
nexto stringum reperimentum da. # $next = pos $string;
nextum stringo reperimento da. # pos $string = $next;
inserto stringum tum unum tum duo excerpementum da.
# $insert = substr($string,1,2);
insertum stringo unum tum duo excerpemento da.
# substr($string,1,2) = $insert;
clavis hashus nominamentum da. # @keys = keys %hash;
clava hashibus nominamento da. # keys %hash = @keys;
An interesting special case is the $#array construction, which in Perligata is rendered via the verb admeta:
counto da arraya admetamentum. # $count = $#array;
๐ฌ Comments ๐ฌ
In Perligata, comments are rendered by the verb adnota ("annotate") and extend until the end of the line. For example:
nexto da prevum. adnota mensuram antiquam reserva
means:
$next = $prev; # remember old amount
๐ Imposing precedence on argument lists ๐
The order-independence of argument lists and subroutine calls largely makes up for the lack of bracketing in Perligata. For example, the Perl statement:
$res = foo(bar($xray,$yell),$zip);
can be written:
reso da xrayum tum yellum barmentum tum zipum foomentum.
Note that the lack of argument list brackets in Perligata means that if it were written:
reso da foomentum barmentum xrayum tum yellum tum zipum.
it would be equivalent to:
$res = foo(bar($xray,$yell,$zip));
instead.
Likewise, it is possible to translate:
$res = foo($xray,bar($yell,$zip));
like so:
reso da xrayum tum barmentum yellum tum zipum foomentum.
But translating:
$res = foo($weld,bar($xray,$yell),$zip);
presents a difficulty.
In the first example above (xrayum tum yellum barmentum tum zipum foomentum), the verb barmentum was used as a suffix on xrayum tum yellum โ to keep the variable zipum out of the argument list of the call to "bar". In the second example (xrayum tum barmentum yellum tum zipum foomentum), the verb barmentum was used as a prefix on yellum tum zipum โ to keep the variable xrayum out of the argument list.
But in this third example, itโs necessary to keep both weldum and zipum out of "bar"โs argument list. Unfortunately, barmentum canโt be both a prefix (to isolate weldum) and a suffix (to isolate zipum) simultaneously.
The solution is to use the preposition cum (meaning "with...") at the start of "bar"โs argument list, with barmentum as a suffix at the end of the list:
reso da foomentum weldum tum cum xrayum tum yellum barmentum tum zipum.
It is always permissible to specify the start of a nested argument list with a cum, so long as the governing verb is used as a suffix.
๐งฑ Blocks and control structures ๐งฑ
Natural languages generally use some parenthetical device โ such as parentheses, commas, or (as here) dashes โ to group and separate collections of phrases or statements. Itโs giving punctuation, periodt.
Some such mechanism would be an obvious choice for denoting Perligata code blocks, but there is a more aesthetically pleasing solution. Perlโs block delimiters ("{".."}") have two particularly desirable properties: they are individually short, and collectively symmetrical. It was considered important to retain those characteristics in Perligata.
In Latin, the word sic has a sense that means "as follows". Happily, its heteropalindrome, cis, has the meaning (among others) "to here", making these two words perfect heteroantigrams (just like "{" and "}"). The allure of this kind of wordplay being impossible to resist, Perligata delimits blocks of statements with these two words. For example:
sic # {
loco ianitori. # local $/;
dato nuntio perlegementum da. # $data = <DATA>;
cis # }
Control structures in Perligata are rendered as conditional clauses, as they are in Latin, English, and Perl. And as in those other languages, they may precede or follow the code blocks they control.
Perligata provides the following control structures:
si ... facโif ...nisi ... facโunless ...dum ... facโwhile ...donec ... facโuntil ...per (quisque) ... in ... facโfor(each) ...posterusโnextultimusโlastreconatusโredoconfectusโcontinue
The trailing fac is the imperative form of facere ("to do") and is used as a delimiter on the control statementโs condition. It is required, regardless of whether the control statement precedes or follows its block.
The choice of dum and donec is completely arbitrary, since Latin does not distinguish "while" and "until" as abstractions in the way English does. dum and donec each mean both "while" and "until", and Latin relies on context (i.e. semantics) to distinguish them. This is impractical for Perligata, so it always treats dum as "while" and donec as "until". This choice was made in order to favour the shorter term for the more common type of loop.
The choice of confectus for "continue" seeks to convey the function of the control structure, not the literal meaning of the English word. That is, a "continue" block specifies how to complete (conficere) an iteration.
Perligata only supports the pure iterative form of for(each), not the C-like three-part syntax.
Because:
foreach $var (@list) {...}
means "for each variable in the list...", the scalar variable must be in the accusative (as it is governed by the preposition "for"), and the list must be in the ablative (denoting inclusion). Fortunately, in the second declension, the inflexion for ablatives is exactly the same as for datives, giving:
per quisque varum in listis sic ... cis
This means that no extra inflexions have to be learned just to use the per loop. Better still, the list (listis) looks like a Perligata array variable in a target role, which it clearly is, since its contents may be modified within the loop.
Note that you can also omit the accusative variable completely:
per quisque in listis sic ... cis
and leave hoc ($_) implied, as in regular Perl.
๐ฆ Data ๐ฆ
The "__END__" and "__DATA__" markers in Perligata are finis ("boundary") and nuntius ("information") respectively. Data specified after either of these markers is available via the input stream nuntio. For example:
dum perlege nuntio fac sic # while (<DATA>) {
scribe egresso hoc. # print $_;
cis # }
#
finis # __END__
post # post
hoc # hoc
ergo # ergo
propter # propter
hoc # hoc
๐ข Numbers ๐ข
Numeric literals in Perligata are rendered by Roman numerals โ I, II, III, IV...XV...XLII, etc, up to
(((((((I)))))))((((((((I))))))))((((((I))))))(((((((I)))))))(((((I)))))((((((I))))))((((I))))(((((I)))))(((I)))((((I))))((I))(((I)))M((I))CMXCIX
(that is: 9,999,999,999)
The digits are:
Iโ 1Vโ 5Xโ 10Lโ 50Cโ 100Dโ 500Mโ 1,000I))โ 5,000((I))โ 10,000I)))โ 50,000(((I)))โ 100,000I))))โ 500,000((((I))))โ 1,000,000I)))))โ 5,000,000(((((I)))))โ 10,000,000I))))))โ 500,000,000((((((I))))))โ 1,000,000,000I)))))))โ 5,000,000,000(((((((I)))))))โ 10,000,000,000
The value ((I)) is 10,000 and every additional pair of apostrophi (rendered as parentheses in ASCII) multiply that value by 10.
Notice that those wacky Romans literally used "half" of each big number (e.g. I)), I))), etc.) to represent half of each big numbers (i.e. 5000, 50000, etc.)
The first 10 numbers can also be called by their actual names, bestie, and they're giving โจvocabulary listโจ energy: unum/unam, duo/duas, tres, quattuor, quinque, sex, septem, octo, novem, decem. And zero? Latin literally has no numeral for it, so Perligata just says nullum โ which is like, "no-one". ๐ Okay so nihil ("nothing") would've been the closer vibe translation, BUT it's indeclinable, meaning you literally cannot tell its accusative from its genitive, so it got benched. Tragic. ๐ญ
Now here's the tea on indexing: when you use a numeric literal inside an indexing operation, it has to be an ordinal. Not "one (element)", but "zeroth (element)", "first (element)", "second (element)", etc. The vibes are ordinal or nothing. ๐
The first ten ordinals are named, and they come in the accusative: primum/primam, secundum/secundam, tertium/tertiam, quartum/quartam, quintum/quintam, sextum/sextam, septimum/septimam, octavum/octavam, nonum/nonam, decimum/decimam. Anything past ten? You just take the numeral and slap the suffix -imum on the end โ so XVimum is your "15th" and XLIIimum is your "42nd". And by that same analogy, ordinal zero gets the invented form nullimum. It's giving made up but we respect it. ๐
But wait โ lvalue check! If the element you're indexing is being used as an lvalue, then obviously that ordinal has to switch to the dative instead: nullimo, primo, secundo, tertio, quarto, quinto, sexto, septimo, octavo, nono, decimo, XIimo, etc. Heads up though: the feminine dative forms are not available in Perligata, because they're ambiguous with the feminine genitive singular forms. So yeah, that's just not a thing. ๐
And when you're doing a multi-level indexing operation, the ordinals may need to show up in the genitive: nulli/nullae, primi/primae, secundi/secundae, tertii/tertiae...XVimi/XVimae, etc.
For example, this:
$unimatrix[1][3][9][7];
would be:
septimum noni tertii primi unimatrixorum
which is literally:
seventh of ninth of third of first of unimatrix
Lowkey important: the order of the genitives is significant here, and it is the reverse of what Perl wants. Yes, really. The way that Latin ate and left no crumbs. ๐ฅ
As mentioned in "Variables", Perligata currently only supports homogeneous multi-level indexing. So if the final genitive indicates an array (like unimatrixorum in the example above), then the preceding index is assumed to be an array index. If the final genitive indicates a hash, then every preceding genitive, and the original ordinal, are presumed to be keys. For example:
septimum noni tertii primi unimatrixorum # $unimatrix[1][3][9][7];
septimum noni tertii primi unimatrixuum # $unimatrix{1}{3}{9}{7};
Floating point numbers in Perligata are expressed as Latin fractions, which is honestly iconic:
unum quartum # 0.25
MMMCXLI Mimos # 3.141
Note that the numerator is always a cardinal and the denominator is a (singular or plural) ordinal โ so "one fourth", "3141 1000ths". โจ The plural of a Latin accusative ordinal gets formed by swapping the -um suffix for -os. That nicety can be ignored though, because Perligata will accept fractions in the form MMMCXLI Mimum ("3141 1000th") too. Flexible queen. ๐
Technically, both numerator and denominator should also be in the feminine gender โ una quartam, MMMCXLI Mimas. That Latin rule is not enforced in Perligata (all the better, since it helps minimize the number of suffixes you have to remember), but Perligata does accept the feminine forms. So no stress either way. ๐ซถ
Perligata outputs numbers in Arabic, but the verb come ("beautify") may be used to convert numbers to proper Roman numerals:
per quisque in I tum C conscribementum sic
hoc tum duos multiplicamentum comementum egresso scribe.
cis
โจ Strings โจ
Okay so Classical Latin does not use punctuation to denote direct quotation. Instead the verb inquit ("said") is used to report a direct utterance. So in Perligata, a literal character string is constructed not with quotation marks, but by invoking the verbal noun inquementum ("the result of saying"), with a data list of literals to be interpolated. Like:
print STDOUT 'Enter next word:';
becomes:
Enter tum next tum word inquementum tum biguttam egresso scribe.
Note that the arguments to inquementum are special โ they're treated as literals. And punctuation strings have special names, iykyk: lacunam ("a hole") for space, stadium ("a stride") for tabspace, novumversum ("new verse") for newline, comma ("comma") for comma, guttam ("a spot") for period, or biguttam ("two spots") for colon. Obsessed with the naming conventions honestly. ๐
It's also possible to directly quote a series of characters (as if they were inside a q{...}. The Perligata equivalent is a dictum sic...cis:
sic Enter next word : cis dictum egresso scribe.
or:
dictum sic Enter next word : cis egresso scribe.
dictum is, of course, a contraction of dicementum ("the result of saying"), and Perligata allows this older form as well. Both ate. ๐
But here's the catch: Perligata does not provide an interpolated quotation mechanism. Instead, variables must be concatenated into a string. So this:
print STDERR "You entered $word\n";
$mesg = "You entered $word";
becomes:
You tum entered inquementum tum wordum tum novumversum oraculo scribe.
mesgo da You tum entered inquementum tum wordum serementum.
โจ Regular expressions โจ
[Perligata's regular expression mechanism is not yet implemented. This section outlines how it will work in a future release.]
In Perligata, patterns will be specified in a constructive syntax (as opposed to Perl's declarative approach). Literals will be regular strings and other components of a pattern will be adjectives, verbs, nouns, or a connective:
Perl Perligata Meaning
==== ========= =======
...+? multum "many"
...+ plurissimum "most"
...?? potis "possible"
...? potissimum "most possible"
(...) captivum "captured"
(?=...) excuba "keep watch"
[...] opta "choose between"
. quidlibet "anything"
\d digitum "a finger"
\s lacunam albam "a white space"
\w litteram "a character"
| an interrogative "or"
The final pattern will be produced using the supine desideratum. For example:
pato da desideratum # $pat = qr/(?x)
C tum plurissimum A tum O opta tum T # C[AO]+T
an DOG tum potissimum GY. # |DOG(?:GY)?/;
Actual matching against a pattern will be done via the compara ("match") and substitue ("substitute") verbs:
si stringum patum comparamentum fac sic # if ($string =~ /$pat/) {
scribe egresso par inquementum # print "match"
cis #
huic substitue patum tum valum # s/$pat/$val/
per quisque in listis. # foreach @list;
Note: the string being modified by substitue will have to be dative. Don't forget, bestie. ๐ซถ
โจ References โจ
To create a reference to a variable, the variable is written in the ablative (which looks exactly like the dative in Perligata's restricted Latin syntax) and prefaced with the preposition ad ("to"). To create a reference to a subroutine, the associated verb is inflected with the accusative suffix -torem ("one who...") to produce the corresponding noun-of-agency. Main character grammar. ๐
For example:
val inquemento hashuum ad dato da. # $hash{'val'} = \$dat;
arg inquemento hashuum ad argis da. # $hash{'arg'} = \@arg;
act inquemento hashuum functorem da. # $hash{'act'} = \&func;
ad val inquemento hashuum dato da. # $dat = \$hash{'val'};
ad inquemento arg hashuum argis da. # @arg = \$hash{'arg'};
funcemento da ad inquemento act hashuum. # func() = \$hash{'act'};
A special case of this construction is the anonymous subroutine constructor factorem ("one who does..."), which is the equivalent of sub {...} in Perl:
anonymo da factorem sic haec mori cis. # $anon = sub { die @_ };
As in Perl, such subroutines may be invoked by concatenating a call specifier to the name of the variable holding the reference:
anonymume nos tum morituri inquementum. # &$anon('Nos morituri');
Note that the variable holding the reference (anonymum) is being used as data, so it is named in the accusative. ๐
In the few cases where a subroutine reference can be the target of an action, the dative suffix -tori is used instead:
benedictum functori classum. # bless \&func, $class;
benedictum factori sic mori cis classum. # bless sub{die}, $class;
To dereference other types of references, a resultative of the verb arcesse ("fetch") is used:
Ref type Perligata Perl Context
======== ========= ==== =======
scalar arcessementum varum $$var rvalue
scalar arcessemento varum $$var lvalue
array arcessementi varum ...[$$var] rvalue
array arcessementa varum @$var rvalue
array arcessementis varum @$var lvalue
array arcessementorum varum $var->[...] either
hash arcessementus varum %$var rvalue
hash arcessementibus varum %$var lvalue
array arcessementuum varum $var->{...} either
Okay, grammar lore moment: the first six forms are just the standard resultatives (in accusative, dative, and genitive) for the regular Perligata verb arcesse. The last three forms are ungrammatical inflections โ -mentum is 2nd declension, not 4th โ but they're plausible extensions of the resultative to denote a hash return value. So like, technically cursed, but in a fun way. ๐ญ
Multiple levels of dereferencing are also possible:
valo da arcessementa arcessementum varum # $val = @$$var;
as is appropriate indexing (using the genitive forms):
valo da primum varum arcessementorum # $val = $var->[1];
valo da primum varum arcessementuum # $val = $var->{1};
valo da primum varum arcessementi arrorum # $val = $arr[$$var][1];
โจ Boolean logic โจ
Perl's logical conjunctive and disjunctive operators come in two precedences, and curiously, so do those of Latin. The higher precedence Perl operators โ && and || โ are represented in Perligata by the emphatic Latin conjunctions atque and vel respectively. The lower precedence operators โ and and or โ are represented by the unemphatic conjunctive suffixes -que and -ve. Hence:
reso damentum foundum atque runementum. # $res = $found && run();
reso damentum foundum runementumque. # $res = $found and run();
reso damentum foundum vel runementum. # $res = $found || run();
reso damentum foundum runementumve. # $res = $found or run();
The way Latin and Perl share the exact same two-tier precedence structure? Iconic. No cap. Periodt. ๐โจ
Okay so the tea on the unemphatic conjunction suffix ๐ซ: just like in Latin, it literally always glues itself onto the first word after the point where the conjunction would've appeared in English. Not before it, not somewhere near it โ the first word after. She has rules. Respect them. ๐
So this:
$result = $val or max($1,$2);
gets rendered as:
resulto damentum valum parprimumve tum parsecundum maxementum.
or, equally valid:
resulto damentum valum maxementumve parprimum tum parsecundum.
Both cute, both correct, both giving exactly the same energy. โจ
Now, proper Latinate comparisons would be odious in Perligata โ like, genuinely tragic ๐ญ โ because they demand that their first argument be expressed in the nominative and they'd themselves have to be indicative. Which sounds fancy and would lowkey improve the positional independence of the language even more, unlocking all of these:
si valus praecedit datum... # if $val < $dat...
si praecedit datum valus... # if $val < $dat...
si datum valus praecedit... # if $val < $dat...
But bestie. The downsides are real. It also drags in another whole set of case inflexions and another verbal suffix. And worse โ much worse โ it would mean noun suffixes are no longer unambiguous. In the 2nd declension the nominative plural ends in the same -i as the genitive singular, and the nominative singular ending (-us) is the same as the accusative plural suffix for the fourth declension. So if nominatives were used, scalars could no longer always be distinguished from arrays or from hashes, except by context. And context is not a strategy, it's a vibe. ๐
To dodge all of that mess, Perligata represents the equality and simple inequality operators with three pairs of verbal nouns:
aequalitamโ "equality (of...)" โ==aequalitasโ "equalities (of...)" โeqpraestantiamโ "precedence (of...)" โ<praestantiasโ "precedences (of...)" โltcomparitiamโ "comparison (of...)" โ<=>comparitiasโ "comparisons (of...)" โcmp
Each one of these takes two data arguments, and that's what it compares. Periodt. ๐ธ
si valum tum datum aequalitam # si $val == $dat
si valum tum datum praestantias # si $val lt $dat
si aum tum bum comparitiam # si $a <=> $b
And the effects of all the other comparison operators โ >, <=, !=, ne, ge, etc. โ are achieved by ordering the two arguments the right way and combining that with the logical negation operator non:
si valum tum datum non aequalitam # if $val != $dat
si datum tum valum praestantiam # if $val > $dat
si valum non praestantias datum # if $val ge $dat
See? Rearrange, negate, ate. ๐
๐ Packages, classes, and modules ๐
The Perligata keyword for declaring a package is domus โ literally "the house of". In this context the name of the class follows the keyword and gets treated as a literal; it's as if it were the data argument of an inquementum. Very "this is just a name, don't overthink it" of her. ๐
To explicitly say that a variable or subroutine belongs to a package, you use the preposition intra ("within"). And to call a subroutine as a method of a particular package (or of an object), you use the preposition apud ("of the house of"). So basically: intra is Perligata's :: and apud is its ->. Write that down. ๐
Inheritance gets specified with the legatarius statement, sitting inside a domus. The name of the base class follows the keyword and is treated as a literal too. This is equivalent to Perl's use base pragma.
The Perl bless function is benedice in Perligata, but it's almost invariably used in the scalar accusative form benedicementum. Perligata also understands the correct (contracted) Latin form of this verb: benedictum. Two forms, both iconic. ๐ฆ
So like:
domus Exemplar intra Simplicio. # package Simplicio::Exemplar;
printere # sub print
sic # {
modus tum indefinitus inquementum mori. # die 'method undefined';
cis # }
domus Specimen. # package Specimen;
legatarius Exemplar intra Simplicio. # use base 'Simplicio::Exemplar';
newere # sub new
sic # {
meis datibus. # my %data;
counto intra Specimen postincresce. # $Specimen::count++;
datibus primum horum benedictum. # bless \%data, $_[0];
cis # }
printere # sub print
sic # {
meo selfo his decapitamentum da. # my $self = shift @_;
haec inquementum carpe. # carp "@_";
cis # }
domus princeps. # package main;
meo objecto da # my $object =
newementum apud Specimen. # Specimen->new;
printe apud objectum; # $object->print;
To import semantics from external modules, the Perl use function is ute ("use") in Perligata. ๐
โ ๏ธ Heads up bestie: lots of module name components end in character patterns that match Perligata syntactic suffixes. Example: theTypeinFile::Typeends with ane, andeis used as a suffix to represent a subroutine call in void context. To stop Perligata from misreading those name components, the keywordsicut("as it certainly is") tells Perligata to not interpret the suffix as being syntactically significant. Do not skip the sicut. She will notice. ๐
For example:
strict ute. # use strict;
warnings ute. # use warnings;
Type sicut intra File ute. # use File::Type;
meo specio da # my $type =
newementum apud Type intra File. # File::Type->new();
Without the sicut keyword in the ute line, the e in Type would be interpreted as being syntactically significant, and an error would be reported on that line. ๐ญ
(Note that the e in File on the ute line, and those in Type and File on the da line, do not require their own sicut keywords, since there's no ambiguity as to whether they might represent subroutine calls in void context. So breathe. ๐ซถ)
๐ ERA (Expositio Rustica Antiqua) ๐
Perligata supports almost the same set of documentation blocks as Perl. (Peep perlpod for the details.)
But here's the twist: whereas POD blocks are introduced by an = sign, ERA blocks are prefixed with the interjection Ecce ("Behold!"). Behold!!! โจ
Just like with POD, every ERA documentation block has to be the first thing on a line, and it opens a documentation section that keeps going until the next Ecce seco ("Behold! I cut"). Cut her off and she stops. ๐
ERA also recognizes two unheralded block types:
- verbatim blocks โ lines of text starting on the left margin
- code blocks โ lines of text that are indented
All the standard Perl formatting codes โ B<>, I<>, C<>, E<>, etc. โ are supported too. ๐
The available ERA documentation blocks are:
ecce explicoโ=podecce prosumโ=forecce incipioโ=beginecce finioโ=endecce intitulo primumโ=head1ecce intitulo secundumโ=head2ecce intitulo tertiumโ=head3ecce intitulo quartumโ=head4ecce intitulo quintumโ=head5ecce intitulo sextumโ=head6ecce ad dextramโ=overecce ad sinistramโ=backecce facio punctumโ=item *ecce numero punctumโ=item 1.ecce definio <TERM>โ=item <TERM>ecce secoโ=cut
The module also ships with a script (bin/explica) which can convert ERA to POD and pass it to perldoc for display. Very generous of her honestly. ๐
๐ THESAURUS PERLIGATUS ๐
This section lists the complete Perligata vocabulary, except for Roman numerals (I, II, III, etc.). We're not doing numerals today, bestie.
In each of the following tables, the three columns are always the same:
- Perl construct
- Perligata equivalent
- Literal meaning of Perligata equivalent
Generally, only the accusative form is shown for nouns and adjectives, and only the imperative for verbs. So if you were hoping for the whole declension wall, that's a you problem. ๐
โจ Values and variables ๐
okay bestie this is the moment, the literal core of it all, your variables and your values, all glowed up in Latin ๐
0โnullumโ "no-one"1โunumโ "one"2โduoโ "two"3โtresโ "three"4โquattuorโ "four"5โquinqueโ "five"6โsexโ "six"7โseptemโ "seven"8โoctoโ "eight"9โnovemโ "nine"10โdecemโ "ten"[0]โnullimumโ "zeroth"[1]โprimumโ "first"[2]โsecundumโ "second"[3]โtertiumโ "third"[4]โquartumโ "fourth"[5]โquintumโ "fifth"[6]โsextumโ "sixth"[7]โseptimumโ "seventh"[8]โoctavumโ "eighth"[9]โnonumโ "ninth"[10]โdecimumโ "tenth"$0โprogrammaโ "the program"$1โparprimumโ "equal of the first"$2โparsecundumโ "equal of the first"$3โpartertiumโ "equal of the third"$4โparquartumโ "equal of the fourth"$5โparquintumโ "equal of the fifth"$6โparsextumโ "equal of the sixth"$7โparseptimumโ "equal of the seventh"$8โparoctavumโ "equal of the eighth"$9โparnonumโ "equal of the ninth"$10โpardecimumโ "equal of the tenth"$/โianitoremโ "gatekeeper"$#varโadmeta varumโ "measure out"$_โhoc/huicโ "this thing"@_โhis/horumโ "these things"$<โnomenโ "a name"@ARGVโparametraโ "parameters"","โcommaโ "a comma""."โguttamโ "a spot"":"โbiguttamโ "two spots"";"โsemicolonโ "semicolon"" "โlacunamโ "a gap""\t"โstadiumโ "a stride""\n"โnovumversumโ "new line"localโlocoโ "in place of"myโmeoโ "my"ourโnostroโ "our"mainโprincepsโ "principal"
โจ Quotelike operators ๐ธ
the quoting girlies, so iconic, so versatile ๐ซถ
'...'โinqueโ "say"q//โinqueโ "say"m//โcomparaโ "match"s///โsubstitueโ "substitute"tr///โconverteโ "translate"
โจ Mathematical operators and functions ๐
math class but make it serve, no cap ๐ฅ
+โaddeโ "add"-โdemeโ "subtract"-โnegaโ "negate"*โmultiplicaโ "multiply"/โdivideโ "divide"%โrecideโ "lop off"**โelevaโ "raise"&โconsociaโ "unite"|โintersecaโ "intersect"^โdiscerneโ "differentiate (between)"++โpreincresceโ "increase beforehand"++โpostincresceโ "increase afterwards"--โpredecresceโ "decrease beforehand"--โpostdecresceโ "decrease afterwards"absโprivaโ "strip from"atan2โangulaโ "create an angle"sinโopponeโ "oppose"cosโaccubaโ "lie beside"intโdecollaโ "behead"logโsuccideโ "log a tree"sqrtโfodeโ "root into"randโconiceโ "guess, cast lots"srandโproseminaโ "to scatter seed"
โจ Logical and comparison operators ๐ฆ
telling true from false, the moment of truth fr fr ๐
!โnonโ "general negation"&&โatqueโ "empathic and"||โvelโ "emphatic or"andโ-queโ "and"orโ-veโ "or"<โpraestantiamโ "precedence of"ltโpraestantiasโ "precedences of"<=>โcomparitiamโ "comparison of"cmpโcomparitiasโ "comparisons of"==โaequalitamโ "equality of"eqโaequalitasโ "equalities of"
โจ Strings ๐
string manipulation, but she's got a Latin degree, periodt โจ
chompโmordeโ "bite"chopโpraecideโ "cut short"chrโindeโ "give a name to"hexโsenidemiโ "sixteen at a time"octโoctoniโ "eight at a time"ordโnumeraโ "number"lcโdeminueโ "diminish"lcfirstโminueโ "diminish"ucโamplificaโ "increase"ucfirstโampliaโ "increase"quotemetaโexcipeโ "make an exception"cryptโhumaโ "inter"lengthโmetaโ "measure"posโreperiโ "locate"packโconvasaโ "pack baggage"unpackโdeconvasaโ "unpack"splitโscindeโ "split"studyโstudeโ "study"indexโscrutaโ "search"joinโconiungeโ "join"substrโexcerpeโ "extract"
โจ Scalars, arrays, and hashes ๐
your data structures getting their whole life, main character energy ๐
definedโconfirmaโ "verify"undefโianiโ "empty, make void"scalarโsecernaโ "to distinguish, isolate"resetโlustaโ "cleanse"popโdecumulaโ "unstack"pushโcumulaโ "stack"shiftโdecapitaโ "behead"unshiftโcapitaโ "crown"spliceโiungeโ "splice"grepโvanneโ "winnow"mapโapplicaโ "apply to"sortโdigereโ "sort"reverseโretexeโ "reverse"deleteโdeleโ "delete"eachโquisqueโ "each"existsโadfirmaโ "confirm"keysโnominaโ "name"valuesโargueโ "to disclose the contents"
โจ I/O ๐
reading and writing, the literal back and forth, we love a communication queen ๐ซถ
openโevoluteโ "open a book"closeโclaudeโ "close a book"eofโextremusโ "end of"readโlegeโ "read"getcโsublegeโ "pick up something"readlineโperlegeโ "read through"printโscribeโ "write"printfโdescribeโ "describe"sprintfโrescribeโ "rewrite"writeโsubscribeโ "write under"pipeโinrigaโ "irrigate"tellโenuntaโ "tell"seekโconquireโ "to seek out"ARGVโparametroโ "(from) a parameter"DATAโnuntioโ "(from) the information"STDINโvestibuloโ "(from) the entrance"STDOUTโegressoโ "(to) the exit"STDERRโoraculoโ "(to) the place where doom is pronounced"
โจ Control structures ๐
the flow controllers, deciding who goes where, the literal puppet masters fr ๐
{...}โsic...cisโ "as follows...to here"doโfacโ "do"sub {...}โfactorem sic...cisโ "one who does ..."evalโaestimaโ "evaluate"exitโexiโ "exit"forโper...in...facโ "for...in...do"foreachโper quisque...in...facโ "for each...in...do"gotoโadiโ "go to"<label>:โinscribe <label>โ "make a mark"returnโreddeโ "return"ifโsi...facโ "if"unlessโnisi...facโ "if not"untilโdonec...facโ "until"whileโdum...facโ "while"wantarrayโdesideโ "want"lastโultimusโ "final"nextโposterusโ "following"redoโreconatusโ "trying again"continueโconfectusโ "complete"dieโmoriโ "die"warnโmoneโ "warn"croakโcoaxaโ "croak (like a frog)"carpโcarpeโ "carp at"__DATA__โnuntiusโ "information"__END__โfinisโ "a boundary"
โจ Packages, classes, and modules ๐
OOP but the Latin way, structuring your whole world, it's giving architecture ๐๏ธโจ
->โapudโ "of the house of"::โintraโ "within"blessโbenediceโ "bless"callerโmemoraโ "recount a history"packageโdomusโ "house of"refโagnosceโ "identify"tieโligaโ "tie"tiedโexhibeโ "display something"untieโsolveโ "to untie"requireโrequireโ "require"useโuteโ "use"
โจ System and filesystem interaction ๐
talking to the actual machine, the literal OS whisperers, highkey powerful ๐ซถ
chdirโdemigrareโ "migrate"chmodโpermitteโ "permit"chownโvendeโ "sell"fcntlโmoderaโ "control"flockโconflueeโ "flock together"globโinveniโ "search"ioctlโimperaโ "command"linkโcopulaโ "link"unlinkโdecopulaโ "unlink"mkdirโaedificaโ "build"renameโrenominaโ "rename"rmdirโexcideโ "raze"statโexprimeโ "describe"truncateโtruncaโ "shorten"alarmโterreโ "frighten"dumpโmitteโ "drop"execโcommutaโ "transform"forkโfurcaโ "fork"killโinterficeโ "kill"sleepโdormiโ "sleep"systemโobsecraโ "entreat a higher power"umaskโdissimulaโ "mask"waitโmantaโ "wait for"
๐ Documentation ๐
Bestie, here's the Perligata glow-up for all your POD-ish documentation commands. The module maps the classic POD directives to these iconic Latin verbs, and the translations are literally what they mean. No cap.
=pod ecce explico "Behold! I explain"
=for ecce prosum "Behold! I am for"
=begin ecce incipio "Behold! I begin"
=end ecce finio "Behold! I end"
=head1 ecce intitulo primum "Behold! I primarily entitle"
=head2 ecce intitulo secundum "Behold! I secondarily entitle"
=head3 ecce intitulo tertium "Behold! I tertiarily entitle"
=head4 ecce intitulo quartum "Behold! I quaternarily entitle"
=head5 ecce intitulo quintum "Behold! I quinarily entitle"
=head6 ecce intitulo sextum "Behold! I senarily entitle"
=over ecce ad dextram "Behold! (I move) to the right"
=back ecce ad sinistram "Behold! (I move) to the left"
=item * ecce facio punctum "Behold! I make a point"
=item 1. ecce numero punctum "Behold! I enumerate a point"
=item <TERM> ecce definio <TERM> "Behold! I define <TERM>"
=cut ecce seco "Behold! I cut"
๐งฉ Miscellaneous ๐
And here are the little connective cuties โ punctuation and odds and ends that Perligata turns into full-on Latin verbs. It's giving grammar as a lifestyle. โจ
, tum "and then"
. sere "conjoin"
.. conscribe "enlist"
\ ad "towards"
= da "give"
#... adnota "annotate"
(... cum "with"
to_roman come "beautify"
๐ฎ DIIUDICATORES ๐ฎ
The Lingua::Romana::Perligata module may issue the following diagnostic messages:
Aliquod barbarum inveni: '%s'โ Some foreign (non-Perligata) symbol was encountered. Commonly this is a semi-colon where a period should have been used, but any other non-alphanumeric will trigger the same error.'-mentis' illicitum: '%s'โ Perl does not (yet) support lvalue subroutines that return arrays. Hence Perligata does not allow the-mentissuffix to be used on user-defined verbs.Index '%s' ordinalis non estโ An index or key was specified as a numeral (e.g.unum), rather than an ordinal (e.g.primum).'%s' immaturum estโ The symbol indicated (typicallytum) appeared too early in the command (e.g. before any accusative).Iussum nefastum: '%s'โ The indicated imperative verb was encountered where a resultative was expected (e.g. the imperative was incorrectly used as an argument to another subroutine or a conjunction).Accusativum non junctum: '%s'โ The indicated accusative noun or clause appears in a command, but does not belong to any verb in the command.Dativum non junctum: '%s'โ The indicated dative noun or clause appears in a command, but does not belong to any verb in the command.Genitivum non junctum: '%s'โ The indicated genitive noun or clause appears in a command, but does not belong to any verb in the command.Sententia imperfecta prope '%s'โ The command or clause is missing an imperative verb.Exspectavi 'sic' sed inveni '%s'โ The beginning of a code block was expected at the point where the indicated word was found.Exspectavi 'cis' sed inveni '%s'โ The end of a code block was expected at the point where the indicated word was found.Exspectavi accusativum post 'per' sed inveni '%s'โ Thepercontrol structure takes an accusative noun after it. The indicated symbol was found instead.'in' pro 'per' afuitโ Theinin aperstatement was missing.'%s' dativus non est in 'per'โ After theinof aperstatement a dative noun or clause is required. It was not found.Iussa absentia per '%s'โ The block of the indicated control statement was missing.Non intellexi: '%s'โ A general error message indicating the symbol was not understood in the context it appeared.
In addition to these diagnostics, additional debugging support is provided in the form of three arguments that may be passed to the call to use Lingua::Romana::Perligata.
- The first of these --
converte("translate") -- causes the module to translate the Perligata code into Perl and write it to STDOUT instead of executing it. This is useful when your Perligata compiles and runs, but does not execute as you expected. - The second argument that may be passed when loading the module is
discribe("classify"), which causes the module to print a lexical analysis of the original Latin program. This is very handy for identifying incorrect inflections, etc. - The final argument --
investiga, ("trace") -- provides a blow-by-blow trace of the translation process, tracking eack of the internal stacks (the verb stack, the accusative stack, the dative stack, the block stack), and showing where each reduction is performed. This wealth of information tends to be useful only to those familiar with the internals of the module.
๐ GRATIAE ๐
Special thanks to Marc Moskowitz, John Crossley, Tom Christiansen, and Bennett Todd, for their invaluable feedback and suggestions. And my enduring gratitude to David Secomb and Deane Blackman for their heroic patience in helping me struggle with the perplexities of the lingua Romana.
โ๏ธ SCRIPTOR โ๏ธ
Damian Conway (damian@conway.org)
๐ CIMICES ๐
There are undoubtedly some very serious bugs lurking somewhere in code this funky :-) Bug reports and other feedback are most welcome.
Corrections to my very poor Latin are doubly welcome.
๐ IUS TRANSCRIBENDI ๐
Copyright (c) 2000-2020, Damian Conway. All Rights Reserved. This module is free software. It may be used, redistributed and/or modified under the terms of the Perl Artistic License (see http://www.perl.com/perl/misc/Artistic.html)
That's a wrap, bestie! This page came from perl v5.40.1 and was dated 2025-11-09 โ the source is Lingua...rligata(3pm). Stay iconic, and may your inflections always agree. ๐
โจ
๐ฆ where this page comes from
- ubuntu resolute: libromana-perligata-perl 0.605-1 ยท Artistic-1.0-Perl OR GPL-1.0-or-later
- ubuntu stonking: libromana-perligata-perl 0.605-1 ยท Artistic-1.0-Perl OR GPL-1.0-or-later
- ๐ girlified by deepseek-ai/DeepSeek-V4.1-Flash on : a language model's rewrite of the original, under its terms