Grab Term::ReadKey, unpack it and apply the following patch to ReadKey.xs:

--- TermReadKey-2.18/ReadKey.xs Sun Feb 10 08:13:35 2002
+++ TermReadKey-2.18tye/ReadKey.xs      Tue Mar 19 12:12:36 2002
@@ -1418,14 +1418,14 @@
 #endif
 
 /* This is for the best, I'm afraid. */
-#if !defined(FCOUNT)
+/*#if !defined(FCOUNT)
 # ifdef Have_select
 #  undef Have_select
 # endif
 # ifdef Have_poll
 #  undef Have_poll
 # endif
-#endif
+#endif*/
[download]

Then build the module and install as usual.