diff --git a/SWIG/Examples/test-suite/enum_thorough.i b/SWIG/Examples/test-suite/enum_thorough.i
index cf3472a64..fb11ca668 100644
--- a/SWIG/Examples/test-suite/enum_thorough.i
+++ b/SWIG/Examples/test-suite/enum_thorough.i
@@ -481,7 +481,27 @@ struct Instances {
 %csconst(1);
 #endif
 
+#if defined(SWIGPERL)
 %inline %{
+
+namespace RepeatSpace {
+typedef enum
+{
+   one = 1,
+   initial = one,
+   two,
+   three,
+   llast = three,
+   end = llast
+} repeat;
+repeat repeatTest(repeat e) { return e; }
+}
+
+%}
+
+#else
+%inline %{
+
 namespace RepeatSpace {
 typedef enum
 {
@@ -498,3 +518,5 @@ repeat repeatTest(repeat e) { return e; }
 %}
 
 
+#endif
+