- baseportal Dokumentation

Titel:

<h2>outl gibt Text mit Zeilenumbruch aus</h2>

<c>outl</c> funktioniert wie <c>out</c>, nur dass es automatisch <c><br/>\n</c> ans Ende hinzufügt, damit nachfolgende Ausgaben in einer neuen Zeile beginnen:

<code>
outl "Zeile1...";
outl "Zeile2...";
</code>

Erst wird "Zeile1..." und in der nächsten Zeile "Zeile2..." ausgegeben..

<h2>outx gibt Text am Beginn des Dokumentes aus</h2>

Zur Fehlersuche ist es oft nützlich Status- und Wertemeldungen zu Beginn der Seite auszugeben. <c>outx</c> fügt automatisch ein <c><br/>\n</c> ans Ende, wie <c>outl</c>.

<code>
out "...normale Ausgabe...";
outx "Wichtig!";
</code>

Hier wird "<c>Wichtig!<br/>\n</c>" ganz zu Beginn der Seite ausgegeben, also vor dem "...normale Ausgabe...".

<h2>Ausgabebuffer ($_out, $_outx)</h2>

<c>$_out</c> enthält den bisher ausgegebenen Text.
<c>$_outx</c> enthält die bisher ausgegebenen Statusmeldungen.

Diese können verändert werden und so die Ausgabe nachträglich umgestaltet oder gelöscht werden. Allerdings funktioniert <c>$_out</c> für die normale Ausgabe nur im <c>Ende</c>-Teil der Seite!

<code>
<h1>Titel</h1>
<include src="menu">
<perl>
$_outx="" if $pure;
</perl>
Text...
</code>

Wenn die Variable <c>$pure</c> gesetzt ist, werden alle bereits erfolgten Statusmeldungen gelöscht. Es wird lediglich "Text..." ausgegeben.

Mit dem folgenden Befehl lässt sich das Gegenteil erreichen:

<h2>Abbruch der Seitenausführung</h2>

Mit <c>die</c> kann an jeder Stelle in der Seite abgebrochen werden. Übergebener Text (und nur dieser) wird ausgegeben:

<code>
Datenbank:
<perl>
return die "Erst ab 18!" if $Alter<18;
</perl>
<do action=all>
</code>

Wenn <c>$Alter</c> kleiner als 18 ist, dann wird lediglich "Erst ab 18!" ausgegeben. Das davorstehende "Datenbank:" wird nicht angezeigt und die nachfolgende Datenbank-Ausgabe nicht mehr ausgeführt.

Ohne Parameter, wird der bisher ausgegebene Text angezeigt:

<code>
Text...
<perl>
out "Mehr Text...";
return die if $Alter<18;
out "Noch mehr Text...";
</perl>
</code>

Gibt "Text... Mehr Text..." aus; alles danach wird nicht mehr bearbeitet.

Lässt man das <c>return</c> weg, wird das aktuelle Perl-Tag noch zu Ende ausgeführt:

<code>
<perl>
out "Wird ausgegeben...";
die if $Alter<18;
out "Wird auch ausgegeben...";
</perl>
Wird nicht ausgegeben, wenn die Bedingung für 'die' erfüllt ist.
</code>

<h2>outf als Ersatz für printf</h2>

<code>
outf "Fliesskomma-Zahl mit 2 Nachkomma-Stellen: %.2f", 4.5678;
</code>

Mehr in der Perl-Dokumentation unter "printf".

<h2>soutf als Ergänzung für sprintf</h2>

<c>sprintf</c> funktioniert auch in baseportal. Trotzdem, der Vollständigkeit halber:

<code>
$f = soutf "Fliesskomma-Zahl mit 2 Nachkomma-Stellen: %.2f", 4.5678;
out $f;
</code>

Mehr in der Perl-Dokumentation unter "sprintf".

Name: Passwort: Stichworte: Version: 1 2 3 Angebot:

Ohne Änderungen zurück zur Seite

Neue Seite erstellen