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