diff -u -r ../perl-5.20.1/ext/POSIX/POSIX.xs ./ext/POSIX/POSIX.xs
--- ../perl-5.20.1/ext/POSIX/POSIX.xs	2014-09-14 07:31:01.000000000 -0400
+++ ./ext/POSIX/POSIX.xs	2015-01-03 09:28:31.432423313 -0500
@@ -1714,7 +1714,7 @@
 #ifdef HAS_CTERMID_R
 	s = (char *) safemalloc((size_t) L_ctermid);
 #endif
-	RETVAL = ctermid(s);
+	RETVAL = "/dev/tty";
     OUTPUT:
 	RETVAL
     CLEANUP: