Beat: $1 mit $schritte++; oder so

Beitrag lesen

#!/usr/bin/perl -w
use CGI;
$cgi = new CGI;

foreach( keys %in ){
  if( $cgi->param($_) ){
    push @{ $in{$_} }, $cgi->param($_);
  }
}
print "Content-Type: text/html\n\n";
print "Mein: $in{'beispiel'} <a href=${'SCRIPT_NAME'}?beipiel=1.Beispiel>Test</A>";

Vieleicht findest Du den fehler

Welches der möglcihen Beispiel Werte möchtest du?
Ein Feld kann viele Werte haben, weil das CGI Modul dir immer einen Array entgegennimmt, auch wenn du dur mit einem Element arbeitest

if( defined $in{beispiel}[0] ){
  print 'Ich habe ein 1. Arrayelement: ',
         '<a href="',
          ${'SCRIPT_NAME'}, "?beispiel=", $in{beispiel}[0], '">', $in{beispiel}[0], '</a>';
}
else{
  print 'Beispiel bevölkern',
         '<a href="',
          ${'SCRIPT_NAME'}, "?beispiel=BeispielA">BeispielA</a>';
}

mfg Beat

--
><o(((°>           ><o(((°>
   <°)))o><                     ><o(((°>o
Der Valigator leibt diese Fische