Erhalten Sie den Text, nicht den Wert, von einem ausgewählten Element mit Perl CGI?

Question

ein HTML-Formular Gegeben:

<select name="fruit"> 
<option value="1">Apple</option> 
<option value="2">Banana</option> 
</select> 

Angenommen, der Benutzer die zweite Option wählt und sendet das Formular. In einer Perl-CGI-Anwendung kann ich den ausgewählten Wert 2 abrufen, indem Sie param('fruit') aufrufen. Wie bekomme ich das gewählte Etikett, Banana?

Ich habe seit einer Stunde im Internet gesucht und kann die Antwort nicht finden.

Answer 1

Das ist nicht möglich. Diese Information wird nicht übertragen. Der Browser fügt fruit=1 nur in die HTTP-Anforderung ein, die er erstellt. Es gibt keine Möglichkeit für Ihr Perl-Programm, diese Informationen zu haben. Es ist einfach nicht da.

Normalerweise würde das Perl-Programm steuern, welcher Wert in einer solchen Situation bedeutet. Sie würden eine passende Einrichtung in Ihrem Programm haben, die weiß, dass 1ist Apple und 2 ist Banana. Sie müssen die value Attribute ändern. Vielleicht zu etwas wie 1|Banana, um die 1 für den Fall zu behalten, dass es woanders gebraucht wird. Die Pipe | ist in diesem Fall willkürlich und ich habe sie nur ausgewählt, weil Ihre Daten anscheinend kein solches Zeichen enthalten.

Wenn Sie die Seite nicht steuern können, könnten Sie auch Ihr Perl-Programm die gleiche Seite holen, die das Formular enthält und es analysieren, um nachzuschlagen, was die 1 bedeutet. Das klingt aber sehr ineffizient. Suchen Sie in HTML::TreeBuilder nach einer Standardmethode zum Analysieren von HTML.