study now passes REXEC_SCREAM to the regex engine when SvSCREAM() is true.

This causes the regex engine to take advantage of the study data.

1 files changed, 1 insertions, 1 deletions

diff --git a/pp.c b/pp.c
index d3d4cc81e8..f815d0a619 100644
--- a/pp.c
+++ b/pp.c
@@ -6152,7 +6152,7 @@ PP(pp_split)
 	    I32 rex_return;
 	    PUTBACK;
 	    rex_return = CALLREGEXEC(rx, (char*)s, (char*)strend, (char*)orig, 1 ,
-			    sv, NULL, 0);
+				     sv, NULL, SvSCREAM(sv) ? REXEC_SCREAM : 0);
 	    SPAGAIN;
 	    if (rex_return == 0)
 		break;