for my $i (0..$#$clusters) {
    my $ID = $units[$i][0];
    my $query = "select * from finalLevel3 where id=" . $dbh->quote($ID);
    my $sth = $dbh -> prepare($query);
    $sth -> execute;
    my @row = $sth -> fetchrow_array;

    ...
}