[PLUG] List ten biggest files with du
Sandy Herring
sandy at herring.org
Mon Oct 13 21:03:21 UTC 2008
Circa 13:54:52 on Mon, 13 Oct 2008, Fred James wrote:
> chris (fool) mccraw wrote:
> > On Mon, Oct 13, 2008 at 13:24, John Jason Jordan <johnxj at comcast.net> wrote:
> >
> >> This ought to be a piece of cake, but I can't get it to work.
[...snip...]
Long ago Randal published the following perl script which does the job
handily...
[sherring at pisces ~]$ cat scripts/findbig
#!/usr/bin/perl
require 'getopts.pl';
require 'find.pl';
&Getopts('n:');
$n = defined $opt_n ? $opt_n : 20;
@ARGV = ($ENV{'HOME'}) unless @ARGV;
&find(@ARGV);
sub wanted {
$size{$name} = -s _ if not -l and -f _;
}
@sorted = sort { $size{$b} <=> $size{$a} } keys %size;
for (@sorted[0..($n-1)]) {
printf
"%40s, %5dK, last accessed %3d days ago\n",
$_ , (-s)/1024, -A _;
}
e.g.
[sherring at pisces ~]$ findbig n10 /var
/var/spool/mail/sherring, 382975K, last accessed 0 days ago
/var/lib/rpm/Packages, 49892K, last accessed 0 days ago
/var/lib/rpm/Filemd5s, 10160K, last accessed 12 days ago
/var/log/lastlog, 6454K, last accessed 0 days ago
/var/cache/yum/base/primary.xml.gz.sqlite, 5956K, last accessed 9 days ago
/var/lib/rpm/Basenames, 5532K, last accessed 12 days ago
/var/lib/rpm/Dirnames, 3084K, last accessed 12 days ago
/var/www/html/gallery-backup.tar.gz, 2050K, last accessed 980 days ago
/var/cache/yum/updates/primary.xml.gz.sqlite, 1583K, last accessed 9 days ago
/var/lib/rpm/__db.002, 1288K, last accessed 0 days ago
/var/www/html/bluezone/docs/admin.chm, 1286K, last accessed 980 days ago
/var/www/html/bluezone/cabs/bzvt.cab, 1066K, last accessed 980 days ago
/var/www/html/bluezone/cabs/bzvt.cab.35, 1053K, last accessed 980 days ago
/var/log/wtmp.1, 1027K, last accessed 109 days ago
/var/www/html/bluezone/cabs/bzmd.cab, 936K, last accessed 980 days ago
/var/www/html/bluezone/cabs/bzad.cab, 896K, last accessed 980 days ago
/var/cache/man/whatis, 894K, last accessed 0 days ago
/var/cache/yum/base/primary.xml.gz, 852K, last accessed 9 days ago
/var/www/html/bluezone/mfc42.exe, 645K, last accessed 980 days ago
/var/cache/yum/extras/primary.xml.gz.sqlite, 629K, last accessed 9 days ago
Sandy
--
Sandy Herring, RHCE o sandy at herring.org
Peck of Pickled Pisces __ o http://herring.org/
*nix || Web authoring questions? |\/ o\ o http://herring.org/finger.html
->http://herring.org/techie.html |/\__/ http://herring.org/pub-key.asc
More information about the PLUG
mailing list