Avoid using cx->blk_loop.itermax when reverse iterating an array.

p4raw-id: //depot/perl@33060

1 files changed, 1 insertions, 1 deletions

diff --git a/pp_ctl.c b/pp_ctl.c
index c857916e99..c0f0724a39 100644
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -1918,7 +1918,7 @@ PP(pp_enteriter)
 	    }
 	}
 	else if (PL_op->op_private & OPpITER_REVERSED) {
-	    cx->blk_loop.itermax = 0;
+	    cx->blk_loop.itermax = 0xDEADBEEF;
 	    cx->blk_loop.iterix = AvFILL(cx->blk_loop.iterary) + 1;
 
 	}