- 598 名前：デフォルトの名無しさん mailto:sage [2008/09/04(木) 23:02:07 ]
- ファイルアップロードしようとして
同じものがあったらエラーって処理をしたいのですが
ttp://www.ss.iij4u.or.jp/~somali/web/_perl_upload.html
ここの改良版の方に
opendir(DIR , $logfiles);
@filelist = readdir(DIR)
closedir(DIR)
foreach (@filelist){
next if $file =~ /^\.{1,2}$/;
if(compare( $fh , $_){
error処理;
}
}
みたいな感じでやっているのですが
上手くいかんのです
たすけてくだしあ
