How can automate the input to a program with Perl?

The program has these prompts:

Enter Username:
Enter Code:

How can I get Perl to input th开发者_如何转开发e proper text for each prompt?

---

Expect is the usual solution.

---

You can use expect. There's a CPAN module for it.