1 files changed, 1 insertions, 1 deletions
diff --git a/perly.y b/perly.y
index 7d39242160..4e00281bcb 100644
--- a/perly.y
+++ b/perly.y
@@ -627,7 +627,7 @@ term	:	termbinop
 	|	termunop
 	|	anonymous
 	|	termdo
-	|	term '?' term ':' term
+	|	term '?' expr ':' term
 			{ $$ = newCONDOP(0, $1, $3, $5); }
 	|	REFGEN term                          /* \$x, \@y, \%z */
 			{ $$ = newUNOP(OP_REFGEN, 0, mod($2,OP_REFGEN)); }