09/12/11 23:13:43 0 BE:61992735-PLT(90010)
>>794
よかたー、ちなみにこんな感じで無理やり痴漢してみました。
$c = scalar( () = $display_match_string =~ /\$[0-9]/g );
if ($host =~ m/$match_string_list/) {
my @mendoi = ($1,$2,$3,$4,$5,$6,$7,$8,$9); ←めんどいので9個位入れちまえー
略
for($j = 1; $j <= $c; $j++) {
$tmp = q{\$} . $j;
$display_match_string =~s/$tmp/$mendoi[$j - 1]/ge;
}
print "このホストの規制表\記は『 <b>" . $display_match_string . "</b> 』になります。</p>\n";
}
やっぱり何度見ても頭悪い書き方ですななー、適当すぎですねぇｗ
酔っ払ったせいで皆さんにご迷惑をおかけしましたー、陳謝