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