#!/usr/bin/perlprint "Content-type: text/html\n\n";print "<html><pre>\n";print "</html>\n";exit 0;