Auslesen eines Arrays für Listenausgabe

[Matti Maekitalo]

use Mosche;

Mein Ansatz sieht so aus:
...
    print qq~
    <select size="1" name="wid">
    <option value=""> </option>
    ~;
    @wid1 = sort(@wid2);
    $laenge = @wid1;
    print "alle wid: @wid1<br>L: $laenge<br>";

Du gibst hier _mitten_ in einer Selectbox einen Text aus - deinen Browser könnte das zu Darstellungsproblemen reichen... Wie sieht denn der resultierende HTML-Source aus? Ist das Problem Browserseitig oder Script-seitig.

for(my $i=0,$i < $laenge,$i++){
    print "<option value='$wid1[$i]'>$wid1[$i]</option>";
    }
    print "</select>";
...

Ansonsten habe ich auf die Schnelle keinen Fehler finden können.

use Tschoe qw(Matti);