#!/bin/rc -e cd /if(test -s /sys/lib/pkg/$1) {	fs=(`{cat /sys/lib/pkg/$1 | awk '{print $1}'})	ss=(`{cat /sys/lib/pkg/$1 | awk '{print $2}'})	for(i in `{seq $#fs}) {		s=`{sha1sum $fs($i) | awk '{print $1}' | tr a-z A-Z}		if(test $s '=' $ss($i)) {			echo D $fs($i)			rm $fs($i)		} 		if not {			echo M $fs($i) NOT DELETING		}	}	rm /sys/lib/pkg/$1}