1 files changed, 1 insertions, 2 deletions
diff --git a/perly.y b/perly.y
index 099969f8b2..96a35e1c0e 100644
--- a/perly.y
+++ b/perly.y
@@ -453,8 +453,7 @@ term	:	term ASSIGNOP term
 			    append_elem(OP_LIST, $3, scalar($1))); }
 	|	NOAMP WORD listexpr
 			{ $$ = newUNOP(OP_ENTERSUB, OPf_STACKED,
-			    append_elem(OP_LIST,
-				$3, newCVREF(0,scalar($2)))); }
+			    append_elem(OP_LIST, $3, scalar($2))); }
 	|	DO term	%prec UNIOP
 			{ $$ = newUNOP(OP_DOFILE, 0, scalar($2)); }
 	|	DO block	%prec '('