если это gnu/linux, то du -h|sort -h
2011/9/28 Nikolay Mishin <[email protected]>: > Добрый день Moscow-pm > > пока получается так > cat du-s > #!/bin/sh > du -h |perl -e '%bo = ( T => -4, G => -3, M => -2, K => -1, k => -1 ); print > map { $_->[0] } sort { $bo{$a->[1]} <=> $bo{$b->[1]} || $b->[2] <=> $a->[2] > } map { [ $_, /([TMGKk])/, /(\d+)/ ] } <>' $* > > Вопрос - а можно короче или оптимальнеею > спасибо. > > С Уважением Николай Мишин > -- > Moscow.pm mailing list > [email protected] | http://moscow.pm.org > > -- Moscow.pm mailing list [email protected] | http://moscow.pm.org
