webForumDet fria alternativet

multiple select till post

Perl & Ruby

1 svar · 194 visningar · startad av nordan

Medlem sedan juni 2000949 inlägg
Frågan#1

Hej om man har en multiple select ruta
där man till exempel har några sköna
hårdrock grupper man kan välja mellan.
Om man då vi vet vilken eller vilka som är valda hur skriver man då det i perl tillsammans med denna kod:
Html kod:

<select name="gruppen" size="1" multiple>
    <option>Metallica</option>
    <option>Iron maiden</option>
    <option>Wasp</option>
  </select>

Perlscript:

print "Content-type: text/html\n\n"; 
                         read (STDIN, $forminfo, $ENV{'CONTENT_LENGTH'});
                         $forminfo =~ tr/+/ /;
                         $forminfo =~ s/%(..)/pack("c",hex($1))/ge; 
                         @par = split(/&/,$forminfo); 
                         foreach $a (@par){ ($ruta, $text) = split(/=/,$a);
                         $INFO{$ruta} = $text; 
                         } 

print "Du gillar gruppen $INFO{'gruppen'}

I detta exempel blir jag bara en vald
jag vill ha möjlighet att skriva ut flera av dom valda!
/
nordan

[Redigerat av nordan den 21 apr 2001]

Medlem sedan juni 20004 308 inlägg
#2

Ett ex är att tab-separera dem;

$INFO{$ruta} .="\t" if($INFO{$ruta});
$INFO{$ruta} .= $text;

och sedan;

foreach $foo (split(/\t/,$INFO{$ruta}){
...kod...
}

------------------

/ J

250 ms totalt · 4 externa anrop · v20260731065814-full.1dc6f849
122 ms — deklarationer (db)
0 ms — hämta statistik (cache)
125 ms — hämta tråd, inlägg och bilagor (db)
120 ms — ändringar (db)