my @results; my $hr_addresses = $dbh->selectall_hashref("SELECT addr, id FROM u2addr", "addr"); if (!defined $hr_addresses) { die("Error executing query: " . $dbh->errstr); } foreach my $addr (@addr) { if (defined $hr_addresses->{$addr}) { push(@results, $hr_addresses->{$addr}) } else { print("Error, ID of address [$addr] not found\n"); } }