--- Clone-0.28-1WvHPM/Clone.xs	2008-01-04 22:50:24.000000000 +0100
+++ Clone-0.28-K51UvF/Clone.xs	2008-01-05 07:30:54.000000000 +0100
@@ -185,6 +185,8 @@ sv_clone (SV * ref, int depth)
         break;
       #if PERL_VERSION <= 8
       case SVt_PVBM:	/* 8 */
+      #elif PERL_VERSION >= 11
+      case SVt_REGEXP:	/* 8 */
       #endif
       case SVt_PVLV:	/* 9 */
       case SVt_PVCV:	/* 12 */