diff --git a/SWIG/Lib/perl5/perlrun.swg b/SWIG/Lib/perl5/perlrun.swg
index 4f7f1a4cb..01ff53f53 100644
--- a/SWIG/Lib/perl5/perlrun.swg
+++ b/SWIG/Lib/perl5/perlrun.swg
@@ -93,7 +93,16 @@ extern "C" {
 
 #ifndef pTHX_
 #define pTHX_
+#endif   
+
+#ifndef PTR2IV
+# define PTR2IV(d) (IV)(d)
 #endif
+ 
+#ifndef INT2PTR
+# define INT2PTR(any,d) (any)(d)
+#endif
+
 
 #include <string.h>
 #ifdef __cplusplus