You might try adding a $STDIN->WriteInput(1, FALSE, 1, 1, 1, 0, 0) after the ->WriteInput(1, TRUE...) to simulate a full keypress, not just a key-down. Also, you could try actually finding out the VK_ code for ENTER and use that rather than just using 1.

Okay, I made the following modifications:

my $STDIN = Win32::Console->new(STD_INPUT_HANDLE);
$STDIN->WriteInput(1, 1, 1, 32, 57, 32, 0);
$STDIN->WriteInput(1, 0, 1, 32, 57, 32, 0);
[download]

This should simulate one full keypress (1 then 0) of the space bar (32/57) with no modifier keys pressed (the last 0). Still no dice. The program still asks for three keypresses.

Incidentally, creating a similar Console for STDOUT doesn't catch the output the way that close STDOUT does. Am I just using the module incorrectly? I've found bugger all for Win32::Console documentation.

Thanks again,
~chris