#!/usr/bin/perl -w print "content-type:text/html; charset=utf-8\n\n"; print qq(); print "enter a word \n"; print qq(
); print qq();