my $sth = $dbh->("SELECT name, adres, woonplaats from personen";

$sth ->execute();

my $array_ref = $sth->fetchall_arrayref();

foreach my $row(@$array_ref){
my( $name, $adres, $woonplaats) = @$row;
print "$name t $adres t $woonplaats";
}