#! perl print "Content-type: text/html koike ";