der block soll anscheinend ausgefuehrt werden, wenn
1. ein cookie gesetzt ist
2. der kookiewert mit $old identisch ist

wenn das zutrifft und $old nicht undef sein kann (undef eq undef => 1), warum nicht einfach:

ich halte nicht definierte variablenwerte nicht fuer schlimm, es ergibt nur manchmal etwas mehr code.

[quote=pq,08.06.2006, 15:55]oder in perl 5.10[/quote]
Oder in perl 5.8 mit defined-or-Patch (scheint bei FreeBSD default zu sein, sehe ich gerade mit Erschrecken).

[quote=ptk,08.06.2006, 22:08][quote=pq,08.06.2006, 15:55]oder in perl 5.10[/quote]
Oder in perl 5.8 mit defined-or-Patch (scheint bei FreeBSD default zu sein, sehe ich gerade mit Erschrecken).[/quote]
unter as-perl-5.8.7 bringt es

Der defined-or-Patch macht den Unterschied. Den kann man allerdings auf alle Perl-Versionen von 5.8.0 bis 5.8.8 anwenden.

hmm, ob ich das mal auf arbeit vorschlagen soll...? na, lieber nicht,
hier dauert es eh 1 1/2 jahre vom vorschlag einer neuen perl-version bis
zu ihrer installation. :-/

cookie() stammt aus CGI.pm !
hab jetzt warnings gelöscht, damit is das Problem weg. Bin mir keinem Fehlverhalten bewusst, da das auch so in der perldoc steht. Dann muss warnings halt gehen.

wenn cookie() dir undef liefert, dann musst du halt selber wissen, was du in dem
fall machst. das kann dir die doku von CGI.pm auch nicht sagen!
warnings löschen ist aber auch lustig. wie löschst du warnings? mit tippex?
oder meinst du mit "warnings löschen" etwa, dass du das statement "use wanings"
entfernt hast? naja, selber schuld. viel erfolg noch in deinem leben.

[quote=Froschpopo,09.06.2006, 11:15]hab jetzt warnings gelöscht, damit is das Problem weg. ... Dann muss warnings halt gehen.[/quote]
Aha, bei Programmdesignfehlern wird einfach die Fehlermeldung deaktiviert. Das spart allerdings auch dann das Nachdenken über eigene Logikfehler im Code. Dann solltest du auch use strict nicht verwenden. Das stört nur unnütz beim Coden.

Ich wundere mich, wie manche programmieren (lernen) *kopfschüttel*

dann müsste ja bei ner variablendeklarierung von z.b.
auch dieselbe meldung kommen. Du sagst ja, dass die kommt, wenn eine variable einen undef wert hat. ist ja im obigen code auch der fall.
Aber genau diesen Code hab ich auch schon öfter in den hier geposteten codesnipplets und anderen dokus gefunden! Dann sind diese Script ab jetzt scheiße und die Programmierer derer für mich gestorben. Ich werd nachher alle aufsuchen und eine Liste mit den ganzen Perlbanausen aufstellen und auf einem thailändischen host veröffentlichen. Weil irgendwann muss man auch mal strafen, sonst wird das nie besser

Ich nehme an Codesnipplets sind Beispiele wie es gemacht werden kann. Sie sind aber nicht immer in jedem Zusammenhang sinnvoll. Und nicht immer richtig.

Ob du die Skripte Sch*** findest ist ja deine eigene Meinung. Und ob diese Programmierer Mist bauen, kann (und muss) ich nicht beurteilen.

Es ist eben lästig, dass ebei eingeschalteten Warnungen Perl Probleme anmeckert.
Das zeugt dann aber davon, dass eineR eben nicht alle Probleme mitbedacht hat.
Warnings sind sinnvoll.

Nicht immer haben Rückgabewerte von Funktionen oder Variablen auch sinnvolle Werte. Das musst du dann prüfen, wenn dein Code wirklich "für alle Fälle gehärtetet" werden soll.

Es kommt eben auf Leher und Schüler an beim Programmieren lernen.

Das es dich ärgert, wenn dein Code nicht geht, besonders wenn du Tipps übernimmst oder von woanders kopierst, ist nachvollziehbar.
Aber das gehört leider auch zum Lernen dazu. Du lernst aus deinen Programmierfehlern und der anderer.

Komm mal wieder runter von deiner Meckerleiter, PerlSchlechtWetterFrosch. ;)