do { $parent--; }while( $parent >= 0 ): geht nicht bei 0 (Seite 2) (Allgemeines zu Perl)

[thread]6009[/thread]

do { $parent--; }while( $parent >= 0 ): geht nicht bei 0 (Seite 2)

pktm

2004-01-12 20:36

User since
2003-08-07
2921 Artikel
BenutzerIn

Quote
die "Undefinierte Parameter in Funktion erstelle_navs" unless defined $insert_id and defined $parent;
die "Unsinniger Wert für \$parent '$parent'" unless $parent >= 0;
die "Unsinniger Wert für \$insert_id '$insert_id'" unless $insert_id >= 0;

Ist gut gemeint, aber das wird vor der Sub bereits gemacht :)

http://www.intergastro-service.de (mein erstes CMS :) )

Crian

2004-01-12 20:55

User since
2003-08-04
5873 Artikel
ModeratorIn

Naja, ich teste in "richtigen" Programmen immer alle Parameter in den Funktionen... schon allein wegen der Wiederverwendbarkeit. Dann brauche ich mich nicht zu fragen, ob wirklich vor jedem Aufruf die Parameter überprüft wurden. Oder ob ich alle Aufrufstellen geändert habe nach Schnittstellenüberarbeitung.

Welche Variablen sind denn durchnummeriert? *nochmalgenauhinkuck*

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite

pktm

2004-01-12 21:44

User since
2003-08-07
2921 Artikel
BenutzerIn

Code: (dl )

1
2
3

       my $cmd0 = "SELECT parent FROM seiten";
       my $sth0 = $dbh->prepare($cmd0) || die $dbh->errstr;
       my $rv0  = $sth->execute        || die $dbh->errstr;

http://www.intergastro-service.de (mein erstes CMS :) )

View all threads created 2004-01-11 20:25.