#!perl -w use strict; print "Content-type: text/plain\n\n"; print "test\n";