#! /bin/sh

cd Recent
rm -f *

WHEN=`perl -e 'print time - (31 * 24 * 60 * 60), "\n"'`

awk "\$4 >= $WHEN { print \$0 }" < ../Merged/run.raw > run.raw
cp ../Merged/tape.raw tape.raw

cd ../Merged
for FILE in *host-raw 
do
	awk "\$6 >= $WHEN { print \$0 }" < $FILE > ../Recent/$FILE
done

