siehe <b><a href="http://baseportal.de/cgi-bin/baseportal.pl?show=/iqws/LOGIN/TemplateAdr_Kopie">Code</a></b>
<hr>


<perl>
####################################
@array=("ich und du",2004,"jeder und keiner");
%hash =(1,"alles oder nichts",zwei,"rein oder raus",3,"immer und ewig");


####################################

$bild="<img src='http://baseportal.de/pics/logo/basep.gif' align=left>";
get "Id==*","TemplateAdr";
#################################### ne Vorlage aus ner Datei holen
       
$test_CB=$template;
$test_HF=$template;
$test_R =$template; 
####################################
%wert="";
$Subroutine2 = \&wert;
$wert{TEST} = &{$Subroutine2}($_get{cmd});

$Subroutine1 = \&Zufallswert;
$Zufallswert = &{$Subroutine1}();


sub Zufallswert {
 return int(rand(1000) + 1);
}
sub wert
{
$lo="Hier ist $_[0]";
return ($lo);
}

</perl>
Beispielsdatenbank mit ein paar Werten.
<do action=all db=Adressen range^=0,1 localparams=+>

<perl>
######################################################### Varianten mal testen

$test_HF=~ s//sprintf("sprintf(\"$&\")")/gimee;

$test_CB=~ s/([\$@%]([\w{}[\]])+)/"\"$1\""/geee;

###############################################################################
out "<hr><p><i>Ausgabe des Variableninhalts \$test</i> mit sprintf!!!</p>";
out $test_HF; ##### Vorlage mit Feldinhalten anzeigen - that's all - OK

out "<hr><p><i>Ausgabe des Variableninhalts \$test</i> mit CB-Vorschlag</p>";
out $test_CB; ##### CB not OK
out "Hallo CB, funktioniert also DEFINITIV NICHT";

</perl>

<hr>
So sieht die Datei für das Layout aus. Siehe auch <b><a href="http://baseportal.de/cgi-bin/baseportal.pl?show=/iqws/LOGIN/TemplateAdr_Kopie">Code</a></b>
<do action=all db=TemplateAdr localparams=+ >