use Term::ReadKey; ReadMode('noecho'); $password = ReadLine(0);