Dateien nach Groesse sortieren
du -s /mnt/data/* | sort -rn > data.data
|
Dateien aussortieren
Die externe Festplatte fasst 320 GB. Die Dateien, die man drauf tun will, braeuchten jedoch 400 GB. Was tun? Man sortiert solange aus, bis es passt :)
#!/usr/bin/perl
my $sum=0;
my $tar;
while()
{
my ($groesse,$name) = split(/s+/);
next if ($groesse =~ /^x/);
$sum += $groesse;
$tar .= " \"$name\"";
}
printf "%d GBn", $sum/1024/1024;
#print "tar cf /tmp/data.tar $tar";
__DATA__
36105671 /mnt/data/abc.data
32236189 /mnt/data/def.data
x14409757 /mnt/data/ghj.data
12033077 /mnt/data/christine.data
8583321 /mnt/data/klm.data
usw.
|
… will heissen, man tut so lange x vorne dran.
Sag etwas dazu: