$1 mit $schritte++; oder so

[Struppi]

Nun habe ich nur den Anfan nicht hinbekommen, da ist irgend etwas falsch:

Du hast die Doku mittlerweile gelesen?

#!/usr/bin/perl -w
use CGI;

use strict;

$cgi = new CGI;
$cgi->param('tiere');

Dieser Befehl macht nichts. Du willst:

my @tiere = $cgi->param('tiere');

print "Content-Type: text/html\n\n";

Die CGI Bibliothek hat auch hierfür eine Funktion. Das Skript könnte so aussehen:

#!/usr/bin/perl -w  
use CGI;  
use strict;  
  
my $cgi = new CGI;  
my @tiere = $cgi->param('tiere');  
  
print $cgi->header(), $cgi->start_html(),  
$cgi->a({-href => '?tier=Hund'}, 'Zum Tier'),  
"@tiere",  
$cgi->end_html();  

Struppi.