SQL-Abfrage

[juha]

HAllo Zusammen

Folgendes würde ich gerne zum x-ten Mal in meinem Perlprogramm anwenden, was ist daran falsch?
Wenn ich es am schluss zur Kontrolle mal ausprinten möchte steht nichts in $datum und auch nichts in $hash_datum->{batch_datum}, führe ich dies gleich in der Datenbank aus so funktioniert mein select befehl!
(z.B. select max(batch_datum) from batch where pers_id = 20; )

Hier der Code:

$select = "select max(batch_datum) from batch where pers_id = $schluss";
my($datum) = $dbh->prepare($select);
$datum->execute();
$hash_datum = $datum->fetchrow_hashref;
$datum = $hash_datum->{batch_datum};

print $hash_datum->{batch_datum};
print $datum;

Danke vielmals
Juha