hi Mod,
$a und $b sind schon in Perl vordefiniert.
Verwende diese Variablen nur, wenn Du sie tatsächlich benötigst( z.B. bei der Sortierung).
Durch my sind Variablen nur innerhalb eines Anweisungsblockes gültig.
Am Ende des Blockes {} werden sie wieder verworfen und benötigen keinen Speicher mehr.
Besser ist es auch, die Wertpaare in einem Hash zu speichern, damit ist man unabhängig von irgend einer Reihenfolge und ein Direktzugriff ist auch möglich.
Die Kurzversion könnte dann so aussehen:
for ( split(/&/, $ENV{'QUERY_STRING'}) ){
my ($k, $v) = split(/=/);
$eintraege{$k} = $v;
}
Der Zugriff erfolgt dann so:
print $eintraege{'dein_key'};
Vor der Verwendung der übergebenen Werte solltest Du sie natürlich noch auf Gültigkeit überprüfen.
Wenn nicht, hast Du mit sehr hoher Wahrscheinlichkeit ein Sicherheitsproblem.
-> Usereingaben NIEMALS ungeprüft verarbeiten <-
Grüße Oesi
(Dieser Beitrag wurde von oesi50 am 18. Sep 2003, 12:02 geändert)