#!/bin/csh  -f
foreach arg ($*)
echo "converting " $arg
awk '{                            \
	if(substr($0,1,2) == "qp") {  \
		print("\!"$0)             \
	}                             \
	else {                        \
		if($NF == "\!qp") {       \
			print("\!"$0)         \
		}                         \
		else {                    \
			print($0)             \
			}                     \
	}                             \
} ' $arg > tmp
diff tmp $arg
mv tmp $arg
end

