experimenting with wrapper scripts in ksh

#!/bin/ksh
# filename: viw
# author: john
# date: Aug 2004
# purpose: wrapper script for vi
USAGE="viw file"
#
#  - test commands for path using "which"
CAT="/bin/cat"
CP="/bin/cp"
DATE="`date +'%y%b%d'`"
LOG="~/script-log.`date +'%y%m%d-%H'`"
LS="/bin/ls"
MV="/bin/mv"
RM="/bin/mv"
PERL="/usr/bin/perl"
TOUCH="/bin/touch"
#
#
# $TOUCH $1
$CP template.txt $1
# note: template has XX, DD as placeholders
#  
#$PERL -pi -e 's/XX/'$1'/g' $1
perl -pi -e 's/XX/'$1'/g' $1
$PERL -pi -e 's/DD/'$DATE'/g' $1