#!./perl

# Test the singlequoted eval optimizer

for (1..1) { }