Skip to content

Instantly share code, notes, and snippets.

@skriebel
Created August 22, 2010 15:10
Show Gist options
  • Save skriebel/543875 to your computer and use it in GitHub Desktop.
Save skriebel/543875 to your computer and use it in GitHub Desktop.
Shell + Perl one-liner to sort and show the sizes of your pwd.
du -k | sort -n | perl -ne 'if ( /^(\d+)\s+(.*$)/){$l=log($1+.1);$m=int($l/log(1024)); printf ("%6.1f\t%s\t%25s %s\n",($1/(2**(10*$m))),(("K","M","G","T","P")[$m]),"*"x (1.5*$l),$2);}'
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment