for i in *.hs ; do j=`echo $i | cut -f 1 -d.` ; mv $i $j.hs_pre ; done