golux - Switching the initial state to readonly has made the code work as I would like it to. Thank you. The readonly state is not documented in "Mastering perl/Tk". It had a state of "active", which does not work. Lesson learned. I need to always check online for the latest documentation.
As for the subroutine changes, they make sense. I just have not gotten that far in the coding to come up with it. I was thinking of making a mega widget that would have a password entry, conformation entry and a visual queue for when things were correct or not.