#!/usr/bin/perl MAIN: { my $test = 3; print "Content-type: text/html\n\n"; print "\n"; print "huh??\n"; print "\n"; exit; }