<div>ну вы ребята круты</div><div> </div><div>du -h|perl -e'print map{$_->[1]}sort{$b->[0]<=>$a->[0]}map{($c,$d)=/([\d.]+)(\w)/;$d=~tr/kKMGT/00123/;[$d+$c/1024,$_]}<>'</div><div>29.09.2011, 18:48, "Denis Evdokimov" <evdokimov.denis@gmail.com>:</div><blockquote>Отличная разминка для мозга ))))<br />Дмитрий, отличный вариант.<br />Он натолкнул меня на ещё более короткий<br />du -h | perl -e'print map{$_->[1]}sort{$b->[0]<=>$a->[0]}map{($c,$d)=/([\d.]+)(\w)/;$d=~tr/kKMGT/00123/;[$c*1024**$d,$_]}<>'<br /> <span>-- <br />Moscow.pm mailing list<br /><a href="mailto:moscow-pm@pm.org">moscow-pm@pm.org</a> | <a href="http://moscow.pm.org">http://moscow.pm.org</a><br /></span></blockquote><div>--<br />Nikolay Mishin</div>