- update to perl-5.12.0-RC1

* new ... operator
  * unicode improvements
  * "each" now also works on arrays
  * support for "delete local"
  * suidperl was dropped

OBS-URL: https://build.opensuse.org/package/show/devel:languages:perl/perl?expand=0&rev=25

perl-regexp-refoverflow.diff

@@ -1,6 +1,6 @@
---- ./regcomp.c.orig	2009-07-27 21:37:52.000000000 +0000
-+++ ./regcomp.c	2009-09-03 14:36:50.000000000 +0000
-@@ -5787,7 +5787,7 @@ S_reg(pTHX_ RExC_state_t *pRExC_state, I
+--- regcomp.c.orig	2010-02-28 20:12:22.000000000 +0000
++++ regcomp.c	2010-03-23 15:38:55.000000000 +0000
+@@ -5818,7 +5818,7 @@ S_reg(pTHX_ RExC_state_t *pRExC_state, I
  
                  ret = reganode(pRExC_state, GOSUB, num);
                  if (!SIZE_ONLY) {
@@ -9,7 +9,7 @@
  			RExC_parse++;
  			vFAIL("Reference to nonexistent group");
  	            }
-@@ -7234,7 +7234,7 @@ tryagain:
+@@ -7260,7 +7260,7 @@ tryagain:
                      if (num < 1)
                          vFAIL("Reference to nonexistent or unclosed group");
                  }
@@ -18,7 +18,7 @@
  		    goto defchar;
  		else {
  		    char * const parse_start = RExC_parse - 1; /* MJD */
-@@ -7248,7 +7248,7 @@ tryagain:
+@@ -7274,7 +7274,7 @@ tryagain:
                          RExC_parse++;
                      }    
  		    if (!SIZE_ONLY) {
@@ -27,7 +27,7 @@
  			    vFAIL("Reference to nonexistent group");
  		    }
  		    RExC_sawback = 1;
-@@ -7425,7 +7425,7 @@ tryagain:
+@@ -7451,7 +7451,7 @@ tryagain:
  		    case '0': case '1': case '2': case '3':case '4':
  		    case '5': case '6': case '7': case '8':case '9':
  			if (*p == '0' ||