#! /usr/bin/perl print "Content-type: text/html\n\n" ; $_ = <> ; print $_;