Emergency UNIX and Linux Support

$ df -h
Filesystem             size   used  avail capacity  Mounted on
rpool/ROOT/s10x_u6wos_07b
                       7.8G   3.8G   2.9G    57%    /
swap                   476M   372K   476M     1%    /etc/svc/volatile

OS, ker|rel, machine: SunOS, 5.10, i86pc
Distribution        : Solaris 10 10/08 s10x_u6wos_07b X86

du -a |sort -r -n >/tmp/list

$ uname -sr
SunOS 5.9
$ find $DIR -printf "%k\n"
find: bad option -printf
find: path-list predicate-list
$

 
find . -type d | xargs du -h

alias lsS='du -s * 2> /dev/null |sort -n |cut -f 2- |while read a; do du -sh "$a" 2> /dev/null; done'

 [root@SKS Shirish]# sh -c sync; echo 3 > /proc/sys/vm/drop_caches; time  du -sb /var
195404352       /var
real    0m2.597s
user    0m0.244s
sys     0m0.468s
[root@SKS Shirish]# sh -c sync; echo 3 > /proc/sys/vm/drop_caches; time  perl  size.pl
Total Size in Byte:  194019894 `in 4686 files
real    0m3.399s
user    0m0.420s
sys     0m0.528s
[root@SKS Shirish]#

 
[root@SKS Shirish]# cat size.pl
#!/usr/bin.perl -w
use strict;
use File::Find;
my $byte_total;
my $file_total;
find (\&sum_bytes, "/var");
sub sum_bytes
{
 return() unless (-f $File::Find::name);
 $byte_total += -s _; 
 $file_total++;
}
print "Total Size in Byte:  $byte_total `in $file_total files\n";