What else besides Term:ReadKey I can use

Tried to accept user response (one key stroke 0r so) to continue the perl segment, but learned that Term:ReadKey is not working under Win32. What else I can use? Please help.

The following is the one I am trying to achieve:

#!/usr/bin/perl -w
use CGI ':standard',"-debug";
use Tie::File;
use Term::ReadKey;
...
...
sub somthing{
...
print "Press any key to continue :";
ReadMode 'cbreak';
while (1) {
$char = readkey(1);
last unless defined $char;
}
ReadMode 'normal';
...
}
...
...
# Main Body

$q=something();
print end_html();