#! /usr/bin/perl
print "Content-type: text/html\n\n";
for ($i=1; $i<=10; $i++) { print "$i<hr>" }