perl my_prog.pl < password.txt