#!/usr/bin/perl -wT
use strict;
use CGI qw(:standard);
use CGI::Debug;

my $t = param("foo");
print "content-type: text/html\n\n";
print $t;