:

for I in \
 "dbi-0_89.tgz DBI-0.89.tar.gz" \
 "apache12.tgz apache_1.2.4.tar.gz" \
 "perl5004.tgz perl5004_1.tar.gz" \
 "tcl8_0.tgz tcl8.0.tar.gz" \
 "tk8_0.tgz tk8.0.tar.gz"
do

	case $I in
	 "") ;;
	 *)
		set - $I
		rm -f $2
		ln -s $1 $2
		;;
	esac
done
