#!usr/bin/perl use CGI; print "Content-type: text/html\n\n"; my $q = new CGI; my $cf = $q->param('cf'); print <

$cf,$ct

HTML