【スクリプト改造依頼スレ】(丸投げ) part3

【スクリプト改造依� ..

217:nobodyさん
05/02/05 17:19:27
>>210
yyregi.cgiの377行あたりにこれでいいんじゃね？
my @_word = ('儲', '必見', '是非');
foreach my $_key (@_word) {
&error("不正なアクセスです") if grep 0 <= index($_, $_key), map $in{$_}, qw/name url email comment/;
}

次ページ