my @emps = $db->query("SELECT ename FROM emp ORDER BY ename")->flat; foreach my $emp (@emps) { ... }