This partially depends on what "available" means. If it means the next highest uid, try Unix::PasswdFile. It has a method to find the highest UID. An example in the POD even shows how to add a user with the next highest uid.

HTH, --traveler