<%@ Page Language=Perlscript Debug="True" %> <% for $i (1 .. 10) { $Response->Write("$i
"); } %>