verschachtelte Datenstruktur

[$xNeTworKx]

Hallo Philipp

Ich habe es jetzt überhaupt ganz einfach gelöst :

open(FILE,"users/$_") or die "An error occured with $_ : $!\nPlease contact $mailadmin to report this error.\n";
flock FILE, 2;
local $/;
my $input = <FILE>;
close FILE;
my $inputname = $1 if $input =~ /<name>(.+?)</name>/;
my $inputpasswort = $1 if $input =~ /<passwort>(.+?)</passwort>/;
if ((lc $name eq lc $inputname) && ($passwort eq $inputpasswort))    {
$$error = '';
return $_;
}

War um diese Zeit gestern schon ein wenig eingerostet :)

while (defined($_ = readdir(DIR)))   {
              ^^^^

ist nicht ratsam, wohl möglich, aber nicht ratsam. $_ ist sozusagen eine "Systemvariable"
und diese solltest du wirklich nicht selber setzen. Verwende stattdessen einen sinnvollen
Namen.

Ich verstehe nicht ganz warum es klüger sein soll, wenn ich erst einer Variable zuweisen soll, um dann die Daten wieder aus der Variable zu holen? Wenn ich sie gleich aus $_ hole, wäre es doch klüger, oder doch nicht?

$xNeTworKx.