#!/bin/awk -f

#
#	Create a data table of when someone empires
#	Parses news times.

BEGIN {
  if (!block) block=10;
}


/^[SMTWF][a-z]{2} [A-Z][a-z]{2} +[0-9]{1,2} [0-9]+:[0-9]+/ {
  split($4,a,":");
  activity[int(a[1]*60/block+a[2]/block)]++;
}

END {
  for (i=0;i<24*60/block;i++) printf("%5.2f\t%d\n",i*block/60,activity[i]);
}
