Perl/CGI-Workshop, Teil 2
Perl/CGI-Workshop, Teil 2
Ausgabe in Perl
Zuallererst möchte ich darauf hinweisen, dass die erste Zeile eines Perl-Scripts mit dem bei Shell-Scripts üblichen She-Bang beginnt, der vom Namen des Perl-Interpreters (inklusive Pfad) gefolgt wird. Das ist notwendig, damit ein Perl-Script durch ./hallo.pl gestartet werden kann (vorher muss natürlich das Attribut "x" gesetzt sein). Andernfalls wäre ein expliziter Aufruf des Perl-Interpreters notwendig:
perl hallo.pl
Ausgabe an die Standardausgabe können Sie in Perl recht einfach machen, wie folgendes "Hallo"-Programm zeigt:
#!/usr/bin/perl # hallo.pl -- by W. Jährling print "Hallo, Welt!\n";
Falls es jemand nicht wissen sollte: "\n" ist die "Escape-Sequenz" für das Newline-Zeichen.
Wenn Sie Ihre Ausgabe an Standard-Error oder eine eventuell geöffnete Datei leiten wollen (wie man Dateien öffnet, kommt später), müssen Sie noch den Ziel-Stream angeben:
#!/usr/bin/perl # halloerr.pl -- by W. Jährling print STDERR "Hallo, Fehler!\n"; print STDOUT "Hallo, Ausgabe!\n"; # äquivalent zu: # print "Hallo, Ausgabe!\n";
Beachten Sie, dass zwischen dem Ausgabe-Stream und dem Text kein Komma steht. Ein Komma wird verwendet, wenn Sie mehrere Dinge ausgeben wollen:
#!/usr/bin/perl # halloviel.pl -- by W. Jährling print "Vier mal sieben ist: ", 4*7; # Das geht auch mit STDERR: print STDERR "Vier mal sieben ist: ", 4*7; print "\nWenn 3 Bleistifte 2,99 DM kosten, dann ", "kosten 5 Stück ", (2.99/3)*5, " DM\n"; print STDERR "Fehler: Es ist kein Fehler aufgetreten!\n";
Bisher werden Sie Perl für eine ganz normale Programmiersprache halten, doch das wird sich bald ändern!
