in reply to Re^3: du -h, sorted
in thread du -h, sorted
Oh, I see. Could I then also change the regex to save two more characters?
And, in fact, since we are only using .1e3 to make sure the sizes sort properly, why not save one more:
74 characters.perl -e'sub c{pop=~/.\s/;(ord$&&7).1e3+$`}print sort{c($b)<=>c$a}`du - +h`'
And, in fact, since we are only using .1e3 to make sure the sizes sort properly, why not save one more:
73 characters.perl -e'sub c{pop=~/.\s/;(ord$&&7)**7+$`}print sort{c($b)<=>c$a}`du -h +`'
In Section
Cool Uses for Perl