... aleshores en lloc de programar en PERL d'aquesta forma:substr($string,1,2) = $insert;
ho fariem d'aquesta altrainsertum stringo unum tum duo excerpemento da.
i en lloc de print STDOUT 'maximum:';
my $maxim = ;
my (@list) = (2..$maxim);
while ($next = shift @list)
{
print STDOUT $next, "\n";
@list = grep {$_ % $next} @list;
}
hauriem de fermaximum inquementum tum biguttam egresso scribe.
meo maximo vestibulo perlegamentum da.
da duo tum maximum conscribementa meis listis.
dum listis decapitamentum damentum nexto
fac sic
nextum tum novumversum scribe egresso.
lista sic hoc recidementum nextum cis vannementa da listis.
cis.
Més detalls a Lingua::Romana::Perligata. La referència l'he trobada al weblog d'en Toni Hermoso.
. Si no s'indica expressament el contrari, el material publicat en aquest weblog es distribueix d'acord amb la llicència Creative Commons. El contingut és responsabilitat única i exclusivament del seu autor i no té cap relació amb les seves activitats professionals.
