Select Code to Download

        $sth = $dbh->prepare("select * from table order by mid"); # So
+rting alphabetically
        $sth->execute();
...
                }
        }
        $sth->finish;

if ($$info{'type'} ne 'NA'){
       # If we do, then remove this ID from the list to retry
        splice @ldap, $count, 1;
        last;
}

if ($$info{'type'} eq 'NA'){
        push(@file, $id);
...
# If we do, then remove this UID from the list to retry
splice @ldap, $count, 1;
last;