O@y XNvg ..
56:52
06/06/11 22:27:03
>>55
\¦ΙΦW΅Δ»€Θ_ͺ2Σ θά΅½B
<select name=icon>\n";
foreach(0 .. $#ico1) {
if ($ico eq $ico1[$_]) {
print "<option value=\"$_\" selected>$ico2[$_]\n";
} else {print "<option value=\"$_\">$ico2[$_]\n";}}
print "</select>\n";
<tr>
EOM
@ico1 = split(/\s+/, $ico1);
@ico2 = split(/\s+/, $ico2);
$i=0; $j=0;
$stop = @ico1;
foreach (0 .. $#ico1) {
$i++; $j++;
print "<td><img src=\"$imgurl$ico1[$_]\">
$ico2[$_]</td>\n";
if ($j != $stop && $i >= 10) {
print "</td><tr>\n";
±κπΗ€’ΆκΞζ’Μš倩Hζλ΅―κΞ¨θ’΅ά·B
y[WΕVX\¦XbhΜυήXκbθΜj
[X¨ά©ΉXg₯IvVπ\¦ΙΒΤ΅2ch
4804ϊOΙXV/190 KB
S:undef