#!/bin/sh
# files of the form:
# try/logfile-$HOST-$DB-$ISBN
mkdir trysum
find try -type f -name 'logfile*' | perl -lne 'm+^try/logfile-(.*)-([^-]*)-(0[^-]*)$+; print "$1 $2 $3";' | (
    while read HOST DB ISBN; do
	if egrep -q '^245' try/logfile-$HOST-$DB-$ISBN; then
	    echo 1 >> trysum/h:$HOST-$DB
	    echo 1 >> trysum/i:$ISBN
	    echo $HOST-$DB hit $ISBN
	    echo 1 >> trysum.hits
	else
	    echo 1 >> trysum.misses
	fi
	echo 1 >> trysum.totals
    done
)
wc -l trysum/h:* | sort -n
wc -l trysum/i:* | sort -n
wc -l trysum.* | sort -n