http://www.perlmonks.org?node_id=657462

ravenpi has asked for the wisdom of the Perl Monks concerning the following question:

Hi, all. I'm attempting to throw some characters into the keyboard buffer to "persuade" a reluctant DOS program to interact with me. It seems as if Win32::Console is the way to go about this, specifically with WriteInput(). That being said, I'm afraid I am below the lowliest of acolytes in the Great Perl Hierarchy, and my attempts to implement this with the (very) sparse documentation available have been futile. (I've been receiving UNDEF upon invocation, which means I goofed.) If someone could show me a functional snippet -- always assuming I'm not entirely barking up the wrong tree -- I'd be eternally grateful for the glimpse at Enlightenment.

Thanks kindly,

-Ken