くだすれPerl（超初心者用）2

くだすれPerl（超初心 ..

268:nobodyさん
08/05/31 20:14:45
>>264
やっぱりperl難しいな・・・

URLﾘﾝｸ(sugachan.dip.jp)
拡張子合わずってログに記録したときは
ファイルをアップしないように改造しようかと
思ってるのだがなかなかできなくて。。。

$in{'ext'} = extfind($in{'orgname'}); if(!$in{'ext'} && $in{'upfile'}){ &error(202); }
を
$in{'ext'} = extfind($in{'orgname'}); if(!$in{'ext'}){ &error(202); }
に、しても普通にアップロードできてしまうし。。。どこがおかしい？

次ページ