perl -p -i -e  's/CUSIPY/CUSIPH/g' <filename>