#!/usr/bin/perl -w

use CGI::Carp qw(fatalsToBrowser);
use strict;
use CGI;
my $cgi = new CGI;

my $data=$cg->param('daten');

print "Content-type: text/html\n\n";
print ".....";
print "$data";