my $stmt = "Select name FROM table WHERE Bedingung ORDER BY name"; my $arref = $dbh->selectall_arrayref($stmt); for my $ar(0..scalar(@$arref)-1){ if($arref->[$ar]->[0] == 8){ print $arref->[$ar+1]->[0],"\n"; } }