Process sar disk %util into a histogram

proc_sar_disk_util_histo.awk

#!/usr/bin/awk -f

/^[0-9].*dev[0-9]*-[0-9]*/{
	diskpos=2
	if ( $2 ~ /(A|P)M/ ) 
		diskpos=3
	dev[$diskpos]=1
	histo[$diskpos][int($NF)]++
}

END {
	printf("Util%")
	for(mydev in dev) {
		printf(",%s",mydev)
	}
	printf("\n")
	for(j=0;j<=100;j++) {
		printf("%s",j)
		for(mydev in dev) {
			printf(",%s",histo[mydev][j])
		}
		printf("\n")
	}
}

cat sar21 | ./proc_sar_disk_util_histo.awk > util_histo.csv

-- Generates %util column data into a histogram -- output to stdout