/blog/perl


substr() in Perl
[104423 mal gelesen]
foreach in Perl
[96734 mal gelesen]
Arrays in Perl - Besonderheiten
[86030 mal gelesen]
open() - Dateien öffnen in Perl
[83297 mal gelesen]
chomp() in Perl
[71146 mal gelesen]
grep - Listen durchsuchen in Perl
[66289 mal gelesen]
push in Perl
[61321 mal gelesen]
split() in Perl - Zeichenketten teilen
[59216 mal gelesen]
sleep in Perl - Das aktuelle Script warten lassen
[44423 mal gelesen]
print in Perl
[40473 mal gelesen]


Arrays
Dateien
HTPC
Hashes
Leistungsoptimiert
PHP
Perl
RegEx
Schleifen
Script
Skalare
Sonstiges
System
Webserver
Zur Startseite


Freitag, 9.2.2007, 09:51:25 Uhr

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
hi



Thema: Perl

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

Es wurde 1 x über diesen Beitrag abgestimmt.
Die durchschnittliche Beurteilung liegt bei
1 (1 = sehr gut - 6 = grottenschlecht).

Kommentar schreiben  Druckansicht  Seitenanfang 
Beurteilen 






 Zufällige Beiträge im /blog/perl

Epoche eines bestimmten Datums herausfinden

Bestimmte Anzahl von Zeilen aus Datei einlesen

Alternativen in regulären Ausdrücken - Oder-Suche mit RegEx

Parameter-Übergabe an ein Perl-Script mit CGI

sendmail-Script

Gruppenbildung in Perl

Elemente eines Arrays in einem Hash löschen - Die schnelle Methode

length() in Perl

Prüfen, ob ein bestimmter Wert in einem Array vorhanden ist

Sozialfotografie-Blog



0.0297741889953613 sec. to build



...Blogsoftware in pure Perl - Powered by a lot of Coffee...


SSD-Festplatte - Wassn das???
Die Transliteration - Nur ein Zeichen in einem Skalar ersetzen
Select - Case in Perl
Windows 7 XP Mode – Wo finde ich den XP-Modus unter Windows 7?
Mac-Adresse beim Apple Macintosh herausfinden
SGN-Funktion für Perl
truncate - Dateigröße verändern in Perl
Eigene IP herausfinden mit Perl
Epoche live in Datum umwandeln
Firefox 3 - Exe-Files downloaden


Von: perluser
Kommentar:
Bei
foreach (@a){$_=~ s/\n//;}
Zum Beitrag


Von: Susi
Kommentar:
vielen Dank, hat mir sehr geholfen :-)
Zum Beitrag


Von: TBu
Kommentar:
Hi,
super Beispiel, DANKE!
Zum Beitrag


Von: Thomas Ha
Kommentar:
Danke für den schönen Blog, er dient mir öfters mal als Nachschlagewerk!

Zum Beitrag


Von: Kasi
Kommentar:
auch im november 2011 noch super hilfreich,danke dir gruß
Zum Beitrag



Gesamtverzeichnis
Februar 2010
Dezember 2009
Oktober 2009
Januar 2009
Dezember 2008
November 2008
September 2008
August 2008
Juli 2008
Juni 2008
Mai 2008
April 2008
Januar 2008
Dezember 2007
November 2007
Oktober 2007
September 2007
August 2007
Juni 2007
Mai 2007
April 2007
März 2007
Februar 2007
Januar 2007
Dezember 2006


Mister Wong

RSS-Feed

Heute ist der
4.2.2012

Es ist
13:32:36 Uhr

Ihre IP:
38.107.179.239

Blog-Einträge: 186

Die letzten 24 Stunden im Überblick


Gelesene Beiträge insgesamt:
2961387


Webseiten vergleichen
Kalender mit Feiertagen - 2028
Links finden und testen
Menschliche Datumsangaben
IP zu Domain herausfinden
Time live in Datum umwandeln
Perl für Windows



Mo Di Mi Do Fr Sa So
12345
6789101112
13141516171819
20212223242526
272829

Impressum