#!/usr/bin/perl -w
use strict;
use CGI qw(param);
my $fname = param('vorname');
print "Content-type: text/html\n\n";
print "$fname\n";