Apparently, I've got to do like everybody else it would seem. However, I wrote the shell-foo the way I would have written it.
$> history | awk {'print $2'} | sort | uniq -c | sort -k1 -rn | head
770 vi 692 ls 491 svn 381 perl 256 make 83 cat 75 grep 72 ssh 70 rm 56 rpmbuild
Vi, Subversion, Perl & make, yup, that sounds like me on productive days. ssh feels lower than it should be though.
