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