1 files changed, 4 insertions, 0 deletions
diff --git a/pp_sys.c b/pp_sys.c
index e35cfd4c2d..7473ba56bc 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -2328,6 +2328,10 @@ PP(pp_accept)
     fcntl(fd, F_SETFD, fd > PL_maxsysfd);	/* ensure close-on-exec */
 #endif
 
+#ifdef EPOC
+    len = sizeof saddr;  /* EPOC somehow truncates info */
+#endif
+
     PUSHp((char *)&saddr, len);
     RETURN;