Hallo kann mir jemand Helfen wie man die eingelesenen Daten im Web ausgeben kann. Möchte das ganze in Input Felder ausgeben. Denn man sollte sie bearbeiten können. Hab mich mal versucht aber es klappt nicht.
#!C:\perl\bin\perl
use IO::Socket::INET;
#use strict;
use CGI::Carp qw(fatalsToBrowser);
my $Input = $ENV{'QUERY_STRING'};
my ($name, $vorname, $strasse, $plz, $ort) = split(/&/,$Input);
require 'C:\Inetpub\wwwOmaFF\cgi-bin\Adresse3.shtm';
require 'C:\FactFinder\example\ff_api.pl';
require 'C:\Inetpub\wwwOmaFF\cgi-bin\cgi-lib.pl';
&ReadParse(*input);
$host = "localhost";
$port = "4001";
print "Content-type: text/shtm \n\n";
$my_url = "http://localhost/cgi-bin/comments.pl";
#Seitenanzeige Vorbereitung
<table width="60%" border=0>
<tr>
<td width=30% align="left"><font>Name</font></td>
<td width=70%>
<input size=25 maxlength=60 value=>
</td>
</tr>
<tr>
<td align="left" width=30%><font>Vorname</font></td>
<td width=70%>
<input size=25 maxlength=60 value=>
</td>
</tr>
<tr>
<td align="left" width=30%><font>Strasse</font></td>
<td width=70%>
<input size=25 maxlength=60 value=>
</td>
</tr>
<tr>
<td align="left" width=30%><font>PLZ</font></td>
<td width=70%>
<input size=25 maxlength=4 value=>
</td>
</tr>
<tr>
<td align="left" width=30%><font>Ort</font></td>
<td width=70%>
<input size=25 maxlength=60 value=>
</td>
</tr>
<tr>
<td align="left" width=30%><font>Tel.</font></td>
<td width=70%>
<input size=25 maxlength=10 value=>
</td>
</tr>;