#!/usr/local/bin/perl5 asp <% if($Request->QueryString('transfer')) { %> We just transferred from transfer.htm !!
<% } %> For loop decrementing font size:
<% for(reverse(1..6)) { %> Size = <%=$_%> <% } %>