nicht angemeldet
Hi Christoph,
Bist du sicher, daß du
use CGI qw (:standard);
wirklich brauchst, oder hätte nicht
use CGI;
ausgereicht?
Umgekehrt wird ein Schuh draus, warum soll man das gesamte CGI-Modul einbinden, wenn die durch ":standard" repräsentierten Funktionen ausreichen. Siehe:
http://www.perldoc.com/perl5.8.0/lib/CGI.html#PROGRAMMING-STYLE
Und zu überlegen wäre vielleicht auch, ob du nicht use vars () einsetzen solltest, um dir die ganzen "my" zu ersparen und die Übersicht zu behalten.
Hm, Perldoc bezeichnet das Modul "vars" als überflüssig:
http://www.perldoc.com/perl5.8.0/lib/vars.html
[...] Zu diesem Zeitpunkt gibt es nämlich deine Subroutine "anzeige()" noch nicht. Schreibe also _erst_deine Subroutinen, und füge den Aufruf mit der if/else-Bedingung ganz unten an.
Nein, das stimmt so nicht, siehe:
http://www.perldoc.com/perl5.8.0/pod/perlsub.html#DESCRIPTION
"Like many languages, Perl provides for user-defined subroutines.
These may be located anywhere in the main program, loaded in from
other files via the do, require, or use keywords, or generated on
the fly using eval or anonymous subroutines."
Viele Grüße
Torsten