#!/bin/csh -f
foreach f ( * )
   if ( -f RCS/$f,v ) then
       sr co -l $f
       chmod -w $f
       \co -r5.0.1 $f
       yes | sed "s/y/\./g" | \ci -u $f
   endif
end