Perl-Ref -> Wie bekomme ich die Daten aus dem Array?? =))

[Matti Maekitalo]

use Mosche;

PS.: Data::Dumper war interessant brachte mir aber nix ;p))

Warum? Du musst lernen zu verstehen, wie die Datenstruktur aufgebaut ist, und wie du da dran kommst. Da hilft die Data::Dumper;

while (my ($vorname, $nachname, $telephon) = $sth->fetchrow_array)
{
push(@array, {vorname=>$vorname, nachname=>$nachname, telephon=>$telephon});
}

Wenn du so einen Hash füllst, geht auch:

while (my $hashref = $sth->fetchrow_hashref) {
 push (@array, $hashref); # # schlüssel = spaltenname
}

print $$array[2]{vorname};  # Vom 2. Suchergebnis der Vorname

Falsch: vom dritten.

print $$array[4]{vorname}; # Vom 4. Suchergebnis das Telephon

Falsch: vom fünften.

use Tschoe qw(Matti);