#!/usr/bin/perl
use CGI::Minimal;
my $value = CGI::Minimal->new->param('a');
print "Status: 200 OK\015\012Content-Type: text/plain\015\012\015\012a = $value\n";