Highest disk usage offending processes

write-offenders.sh

#!/bin/bash

## requires iotop to be installed

sudo iotop -botqqqk --iter=600 >> iotop.log

cat iotop.log \
  ## remove characters before write speed
  | cut -c 41- \
  ## look for any write speed that is non-zero
  | grep -P "^ *(0\.([1-9]\d|0[1-9])|[1-9]\d\.\d\d) K/s" \
  ## remove characters before the process name
  | cut -c 30- \
  ## this sort makes uniq -c much faster
  | sort \
  ## count unique lines
  | uniq -c \
  ## sort by number descending
  | sort -rn