What are you trying to achive with that password? Forbid the user to execute the script? Since Perl scripts have to be readable in order to be executable, a smart user could copy the script, remove the part requesting a password and then execute it.

OTOH, you could jail the script with permissions and a suid/sgid wrapper in C, but maybe this is too overkill depending on what you want.