[Moscow.pm] Get human-readable output from du, sorted by size:

[Nikita Zubkov]

А может стоит развернутее и с комментариями? Это уже сложно поддерживать.

28 сентября 2011 г. 13:12 пользователь Nikolay Mishin <mi на ya.ru> написал:
> Добрый день 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
> moscow-pm на pm.org | http://moscow.pm.org
>
>



-- 
С уважением,
Никита Зубков
тел: +7 (915) 082-76-80