perl 5.0 alpha 4

[p5sagit/p5-mst-13.2.git] / foo

#!./perl

# Test the singlequoted eval optimizer

for (1..1) { }