backout change#2334

p4raw-link: @2334 on //depot/perl: 60ad88b8fe9480f2f097fca26f4f3a9f83a4f830

p4raw-id: //depot/perl@2383

1 files changed, 1 insertions, 1 deletions

diff --git a/pp_hot.c b/pp_hot.c
index f9ff09dce7..9b1791df5e 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -819,7 +819,7 @@ PP(pp_qr)
     djSP;
     register PMOP *pm = cPMOP;
     SV *rv = sv_newmortal();
-    SV *sv = newSVrv(rv, "re");
+    SV *sv = newSVrv(rv, "Regexp");
     sv_magic(sv,(SV*)ReREFCNT_inc(pm->op_pmregexp),'r',0,0);
     RETURNX(PUSHs(rv));
 }