ls *CDR|while read line
do
echo $line
p1=`echo $line|awk -F- '{print $1}'`
p2=`echo $line|awk -F- '{print $2}'`
p3=`echo $line|awk -F- '{print $3}'`
mv $line $p1-0431-$p3
done
do
echo $line
p1=`echo $line|awk -F- '{print $1}'`
p2=`echo $line|awk -F- '{print $2}'`
p3=`echo $line|awk -F- '{print $3}'`
mv $line $p1-0431-$p3
done