#! /bin/ksh

typeset  -l  wkday
typeset  -l  month
typeset -Z2  iday

date > /var/tmp/datefile283874721

exec 3< /var/tmp/datefile283874721
read -u3 wkday month day time zone year
exec 3<&-

iday=$day
newfile=$1'_'$iday$month$year

cp $1 $newfile

chmod a-w $newfile
chmod u+w $1