du -h * | grep '4.0K' | cut -f 2 | perl -e 'open FH../t.txt"; my @lines = <FH>; close FH; my %t; for(@lines){my ($k, $v) = split / -> /, $_; $t{$k} = $v} ;while(<>){chomp;delete $t{$_};} print scalar keys %t;'
删除Linux空目录
最新推荐文章于 2024-09-07 05:45:00 发布