#!/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

