天天看點

perl 調用rm -rf 遞歸删除指定檔案夾,提示 can not remove: not empty 原因

my $dir = "/root/syn/Design/test.txt";

open $fh_dir, "> $dir " or die"$!";

chdir "/root/syn/" or die "$!";

system "rm -rf Design";

句柄鎖定了該目錄,是以perl不會再允許對該目錄進行删除,避免引起沖突

my $dir = "/root/syn/Design/test.txt";

#open $fh_dir, "> $dir " or die"$!";

chdir "/root/syn/" or die "$!";

system "rm -rf Design";

注釋掉,open之後,報錯解決

如果有朋友遇到,算是一個提醒吧,