Hi!
Wenn ich aus einer Datenbank die Voreinstellung laden möchte, geht es generell so:
print „ESSLEAPPMASTERSTUDVSOTHERNONE\n“;
Das funktioniert ja, aber bei mehreren Select Menüs gibt das einen ordentlichen Programmieraufwand.
Ist es auch möglich das leichter zu programmieren? Ähnlich wie bei einem input Feld mit dem Wert value?
Beste Grüße
Martin
Hallo Martin!
es geht tatsächlich etwas einfacher, zumindest was
den Programmieraufwand angeht 
:
#!C:/Perl/bin/perl -w --
use strict;
my $db = "sle";
my @fuellung = qw[es sle app master stud vs other none];
my $selected = "";
print qq[\n];
map {
$selected = $\_ eq $db ? "selected" : "";
print qq[\U$\_\E\n];
}
@fuellung;
print qq[\n];
Gruß,
-Andreas.