#! /bin/csh

set fn = `ls *_dat`

foreach ff ( $fn[*] )

sed 's/D/E/' $ff > $ff.2

mv -f $ff.2 $ff

end
