1 files changed, 1 insertions, 0 deletions
diff --git a/perly.y b/perly.y
index c07f48a4d3..bcdd434eca 100644
--- a/perly.y
+++ b/perly.y
@@ -1238,6 +1238,7 @@ term	:	termbinop
 			{
 			  $$ = newLISTOP(OP_DIE, 0, newOP(OP_PUSHMARK, 0),
 				newSVOP(OP_CONST, 0, newSVpvs("Unimplemented")));
+			  TOKEN_GETMAD($1,$$,'X');
 			}
 	;