print in Perl

Hier ist er also, der gute alte print-Befehl, den man aus vielen anderen Programmiersprachen kennt.
Und natürlich ist er auch in Perl dafür zuständig, etwas auszugeben.

Was und wohin etwas ausgeegeben wird, ist aber abhängig davon, wie print verwendet wird.

print "Ausgabe";
print "$ausgabe oder Eingabe";
print 'Ausgabe'. Ausgabe;
print out $ausgabe;
print out "$ausgabe $ausgabe";
print "die\ndas\njenes\n";

print kann also unterschiedlich verwendet werden. Aber erstmal der Reihe nach:

Beispiel
print 'Eine Ausgabe';
Die einfachste Form von print. Ausgegeben werden die Zeichen, die zwischen den '-Zeichen stehen.

Beispiel
$a="in Perl.";
print 'Eine Ausgabe '.$a;
Ausgabe: Eine Ausgabe in Perl.
Ausgegeben wird also der Text zwischen den '-Zeichen, der Inhalt von $a wird angehängt.

Beispiel
$a="in Perl.";
print 'Eine Ausgabe $a';
Ausgabe: Eine Ausgabe $a
Wieder werden die Zeichen zwischen den '-Zeichen ausgegeben, $a wird nicht evaluiert!!!

Beispiel
$a="in Perl.";
print "Eine Ausgabe $a";
Ausgabe: Eine Ausgabe in Perl.
Die Zeichen zwischen den "-Zeichen werden ausgegeben, Variablen werden evaluiert!!!

Beispiel
print 'Eine Ausgabe: '.⊂
sub sub{return 'aus der Unterfunktion';}

Ausgabe: Eine Ausgabe: aus der Unterfunktion
Es werden Die Zeichen zwischen den ' und dnach der Rückgabewert der Funktion ⊂ ausgegeben.

Beispiel
@a=('a','b','c');
print @a;
Ausgabe: a b c
Es werden alle Elemente von @a ausgegeben.

Beispiel
print <<EOF;
bla bla
blubb
EOF
Ausgabe:
bla bla
blubb
Es werden also alle Zeichen zwischen <<EOF; und EOF ausgegeben. Eine sehr nütuliche Funktion, falls man Quelltexte ausgeben möchte.
Wichtig: Hinter EOF MUSS ein Zeilenumbruch kommen!

Beispiel
open (out,">testdatei.txt");
print out "Eine Ausgabe\n";
close out;
Schreibt in die Datei Testdatei "Eine Ausgabe".

print ist also eine sehr vielseitige Funktion, die alles mögliche auf den Bildschirm oder in Dateien ausgeben kann.

Übrigens:
Ein print 3+4; gibt 7 aus, aber das war glaube ich selbverständlich...

Kommentare zum Beitrag "print in Perl"

Kommentar von gast

Sehr schön hier, habe schon viele tolle Antworten gefunden. Wie erklärt ihr euch die Ausgabe bei diesem Codestück?

print "Los gehts ....", "\n";
print (3+4)/2, "\n";
print "Ende", "\n";

Kommentar von Norbert

wie wär es mit

print "Los gehts ....", "\n";
print "", (3+4)/2, "\n";
print "Ende", "\n";

Kommentar von gr

Thema: Perl

Der Beitrag "print in Perl" wurde 58019 mal gelesen.