#!/usr/bin/perl
# Reaktion des CGI Programms
use strict;
use warnings;
read (STDIN, my $Daten, $ENV{'Content_LENGTH'});
print "Content-type: text/\n\n";
print "CGI-Reaktion\n";
print "Reaktion des CGI-Programms
\n";
print $ENV{'CONTENT_LENGTH'};
print "\n";