start working on verify password perl script (not finished)