diff -r 2d60fada033e -r 5a256b08fdc6 htdocs/cgi-bin/receive_a.test --- a/htdocs/cgi-bin/receive_a.test Mon Feb 11 09:37:04 2013 +0100 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,21 +0,0 @@ -#!/usr/bin/perl - -use strict; -use warnings; -use CGI; - -my ( $input, $q, $key, $wert, $param, %result ); - -#read(STDIN, $input, $ENV{'CONTENT_LENGTH'})or die "error in read: $!"; -$q = new CGI; - -$anhang = $q->param('POSTDATA'); - -my @params = split( /&/, $anhang ); - -foreach (@params) { - ( $key, $wert ) = split( /=/, $_ ); - $result{$key} = $wert; -} - -# Folgend SSL-Script