1 files changed, 1 insertions, 0 deletions
diff --git a/perly.y b/perly.y
index 6ba61aebba..64fc6acfd1 100644
--- a/perly.y
+++ b/perly.y
@@ -263,6 +263,7 @@ barestmt:	PLUGSTMT
 			      SvREFCNT_inc_simple_void(fmtcv);
 			      pad_add_anon(fmtcv, OP_NULL);
 			  }
+			  parser->parsed_sub = 1;
 			}
 	|	SUB subname startsub
 			{