baseportal | |||
English - Deutsch | "Es gibt keine dummen Fragen - jeder hat einmal angefangen" | ||
|
Ausgewählter Eintrag: | Zur Liste |
get "Field==fname_optionfeld", "db.fields", "erghash"; @l_o = split/\n/,$Params; #optionen rausdröseln # diese Zeile killt aber gleichzeitig den ersten Eintrag im Optionfeld, offensichtlich ist die Beschreibung nicht mittels new_line von den Params getrennt - Analyse der Struktur ergibt ein Konstrukt in der Art: #option### woran sich direkt die Parameter des Optionfeldes anschliessen,die dann durch new-line getrennt sind shift(@l_o); #erstes element entfernen, beschreibung des felds foreach (@l_o){ if ($f_t_klasse eq $_ ){ $a_opt_t_klasse.= "<option selected value=\"$_\">$_</option>"; }else{ $a_opt_t_klasse.= "<option value=\"$_\">$_</option>"; } }
Alle Einträge zum Thema: | Zur Liste |
get "Field==fname_optionfeld", "db.fields", "erghash"; @l_o = split/\n/,$Params; #optionen rausdröseln # diese Zeile killt aber gleichzeitig den ersten Eintrag im Optionfeld, offensichtlich ist die Beschreibung nicht mittels new_line von den Params getrennt - Analyse der Struktur ergibt ein Konstrukt in der Art: #option### woran sich direkt die Parameter des Optionfeldes anschliessen,die dann durch new-line getrennt sind shift(@l_o); #erstes element entfernen, beschreibung des felds foreach (@l_o){ if ($f_t_klasse eq $_ ){ $a_opt_t_klasse.= "<option selected value=\"$_\">$_</option>"; }else{ $a_opt_t_klasse.= "<option value=\"$_\">$_</option>"; } }
get "Field==fname_optionfeld", "db.fields", "erghash"; $Params=~s/.*#([^#]+)$/$1/g; # alles bis zum letzten # löschen @l_o = split/\n/,$Params; #optionen rausdröseln foreach (@l_o){ if ($f_t_klasse eq $_ ){ $a_opt_t_klasse.= "<option selected value=\"$_\">$_</option>"; }else{ $a_opt_t_klasse.= "<option value=\"$_\">$_</option>"; } }
- aber so richti glücklich macht mich das auch nicht (naja, erstens versteh ich den Ausdruck beim besten Willen nich komplett und dann ist ja globales ersetzten bis zum letzten # relativ gefährlich, könnte ja ein # in den Parameteren stehen....
$l_o[0] = substr $l_o[0], rindex ($l_o[0], '##')+2;
Liste der Einträge von 35551 bis 35701: | Einklappen | Zur Eingabe |
Neueste Einträge << 10 | 9 | 8 | 7 | 6 | 5 | 4 | 3 | 2 | Neuere Einträge < | Zur Eingabe | > Ältere Einträge | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 >> Älteste Einträge |
© baseportal.de. Alle Rechte vorbehalten. Nutzungsbedingungen |