1 files changed, 3 insertions, 2 deletions

diff --git a/foo b/foo
index b7de1fc3fb..94d9292ce9 100755
--- a/foo
+++ b/foo
@@ -1,4 +1,5 @@
 #!./perl
 
-BEGIN { $/ = "" }
-print while <>;
+# Test the singlequoted eval optimizer
+
+for (1..1) { }