匿名質問者匿名質問者回答ポイント なしウォッチ

perlでディレクトリ内のファイルをすべて消したい。


ディレクトリの中に入っているファイルをすべて消したいです。
ググって2通り試してみたのですがうまくいきませんでした。
(どちらもエラーは出ずただ消えないだけ…)


$Deleir = './img';
opendir(DIR, $Deleir);
unlink map { $Deleir.'/'.$_ } grep { -f $Deleir.'/'.$_ } readdir DIR;
closedir(DIR);


$Deleir = './img';
unlink(glob("$Deleir/*.*"));

どのようにしたらよいでしょうか?

ログインして回答する

みんなの回答

この質問へのコメント

この質問への反応(ブックマークコメント)

質問の情報

登録日時
2017-06-02 09:25:40
終了日時
2017-06-09 09:30:03
回答条件
1人5回まで

この質問のカテゴリ

この質問に含まれるキーワード

grep131Perl1679ディレクトリ1525Dir154

人気の質問

メニュー

PC版