-- eval
print for 1..100;

##</code><code>##

-- eval
print join "$/UNION ALL$/", map "SELECT $_ as x", 1..100;