use IO::Prompt; $pwd = prompt "enter password: ", -echo=>""; #### use IO::Prompt; $pwd = prompt "enter password: ", -echo=>"*";