% cat cicero.cic 
[% fontsize = 24; bold; lead = 30 %]The Cicero document processing system

[% fontsize = 12; roman; color = "%00ff0044" %]Simon Cozens

[% color = "black"; lead = 14 %]This text is typeset by the Cicero
document processing system.

[% PERL %]
for (6..12) { 
    $stash->set("fontsize",$_); 
    Cicero::typeset("The square of $_ is ".$_*$_.".\n\n") 
}
[% END %]
% cicero cicero.cic
% open cicero.pdf